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Preface 


Use of the Book 

This book is developed mainly for junior undergraduate engineering students who have no programming experience, 
completely new to MATLAB. It may be used in courses such as Computers in Engineering, or others that use MATLAB 
as a software platform. It also can be used as a self-study book for learning MATLAB. 

Features of the Book 

Case studies and examples are the core of the book. We believe that the best way to learn MATLAB is to study 
programs written by experienced programmers and that these example programs determine the quality of a book. The 
examples in this book are carefully designed to teach students MATLAB programming as well as to inspire their problem¬ 
solving potentials. Many are designed to solve a class of problems, instead of a particular problem. 

Learning by doing is the teaching approach: students are guided to tackle a problem using MATLAB statements first 
and then the statements are explained line by line. If the meanings of a statement are obvious, further explanation may not 
be necessary at all. We believe that this is the most efficient and pain-free way of learning MATLAB. This approach, 
together with the extensive use of ordered textboxes, figures, and tables, largely reduces the size of the book, while 
providing desirable readability and comprehensiveness. 

Junior-college-level engineering problems are used. Background knowledge for these engineering problems are 
illustrated as thoroughly as possible. 

Reference materials outside the book can be found mostly either in the MALAB on-line help or in Wikipedia, their 
exact locations always pointed out. The idea is that the reference materials should be immediately available for the 
students; they don't need to go to the library searching for reference books or journal papers. Cross references inside the 
book always come with the page numbers to facilitate the reading. 

To Students: How to Work with the Book 

Chapter 1 introduces MATLAB programming environment and overviews MATLAB functionalities. Chapters 2-9 
discuss basic MATLAB functionalities in a progressive and comprehensive way. Chapters 10-13 give advanced topics 
that are useful in the college years. Each chapter consists of sections, each covering a topic and providing one or more 
examples. Related MATLAB functions are tabulated at the end of a section. Additional exercise problems are appended 
at the end of Chapters 2-9. 

Examples in a section are presented in a consistent way. An example is usually described first, followed by a 
MATLAB script. In many cases, the explanation is not even needed, since, as you type and execute the commands, you'll 
appreciate the concepts that the example intends to convey. Text/graphics output, sometimes input as well, is presented. 
The rest of the text is to explain the statements of the script. 

Although providing all program files (see SDC Publications Website, next page), we hope that you type each 
statement yourself, since as you type you are acquainting yourself with the MATLAB language. Often, you mistype and 
take lots of time to fix the mistakes. However, fixing errors is a precious experience of the learning process, further, 
whenever possible, execute the statements one at a time (If necessary, using debugging mode; see Section 1.11) and watch 
the outcome of each statement, i.e., the text/graphic output on the screen. 

One of the objectives of this book is to familiarize you with MATLAB on-line documentation, to ensure your 
continuing growth of MATLAB programing techniques even after the completion of this book. Therefore, consult the 
MATLAB on-line documentation as often as possible. In this book, we expect you to look up the on-line documentation 
yourself, whenever a new function is encountered. 



Preface 9 


To Instructors: How I Use the Book 

The book is designed to be like a workbook. Each chapter should be able to be completed in 1-2 weeks. Each week in the 
classroom, I briefly introduce the materials and, after the classroom hours, let the students work with the book themselves 
on computers. I also create a weekly on-line discussion forum and let the students post their results, questions, comments, 
extra work, and so forth. I rate each student's post with a score of 0-5. The accumulated score becomes the grade for the 
week. I also participate in the discussion and record students' questions that are worth further illustration in the 
classroom. This teaching model has proved to be efficient and my students love it. 

SDC Publications Website 

There are no supporting files needed for this book. You type, save, and run each example program, and observe the 
outcome of the program. However, if you really hate typing, all the program files are available for free download from 
either the SDC publications website or the author's webpage. 

Author's Webpage 

A dedicate webpage for this book is maintained by the author: 
http://myweb.ncku.edu.tw/~hhlee/Myweb_at_NCKU/MATLAB2017.html 

Notations 

To efficiently present the material, the writing of this book is not always done in a traditional format. Chapters and 
sections are numbered in a traditional way, e.g., Chapter 1, Section 1.2, etc. Textboxes in a section are ordered with 
numbers enclosed by square brackets (e.g., [3]). We may refer to the third textbox in Section 1.2 as "1.2[3]." When 
referring to a textbox from the same section, we drop the section identifier; for the foregoing example, we simply write 
"[3]." Equations are numbered in a similar way, except that lower-case letters enclosed by round brackets (parentheses) 
are used to identify the equations. For example, "1.2(a)" refers to the first equation in Section 1.2. These notations are 
summarized as follows: 


[1],[2],... 

(a), (b),... 

Reference 

Workspace 

Round-cornered textbox 
Sharp-cornered textbox 

# 


Numbers enclosed by square brackets are used to identify textboxes. 

Lower-case letters enclosed by round brackets are used to identify equations. 
References are italicized. 

Boldface is used to highlight words, specifically MATLAB keywords. 

A round-cornered textbox indicates that mouse or keyboard actions are needed. 

A sharp-cornered textbox is for commentary, no mouse or keyboard actions needed. 
A right arrow means that the next textbox is on the next page. 

A symbol # means that it is the last textbox of a section. 


Huei-Huang Lee 

Associate Professor 
Department of Engineering Science 
National Cheng Kung University, Taiwan 
e-mail: hhlee@mail.ncku.edu.tw 
webpage: myweb.ncku.edu.tw/~hhlee 



Chapter 1 

Getting Started, Desktop 
Environment, and Overview 


This chapter introduces 1.1 

MATLAB desktop environment ^ 2 

and gives you an overview of 
the MATLAB functionalities. 1 -3 

Each section either introduces a | 4 
topic that will be detailed in the 
future chapters or presents 1 

features of the MATLAB 1 .6 

desktop environment that will j j 

be useful throughout the book. 

The introduction of the topics 1 -8 

is to provide a overall, yet | 9 

incomplete picture of 1 1 a 

MATLAB. If you feel it is 1,10 

difficult to fully comprehend, 1.11 

don't worry, we'll give you the 1 12 
details in the future chapters. 

Now, fasten your seat belt and 1.13 
enjoy the learning experience... 1.14 

1.15 

1.16 

1.17 

1.18 

1.19 

1.20 
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1.1 Start and Quit MATLAB 


MATLAB R2017a prerelease n 

PLOTS 


@ GJ jgFindFles £ ^ N#W 

/ Open Variable 

Mew New Open Compare Import Save 
Script » » Data Workspace \Q Clear Workspace ■» ( 

FILE VARIABLE 


- £ - - & &>f 




Variable Analyze Code |> 1 | |~r*| li. ,9, l u Community 

a UJ Preferences 

1 Variable ▼ hf Run and Tine ->> Request Support 

Simulink Layout | j Set Path Add-Ons Help 

Clear Commands ▼ ▼ » » Q Learn MATLAB 

SIMULINK_ENVIRONMENT_RESOURCES 


Search Documentation 
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HU Search Documentation 
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1.2 Entering Commands 



A 

S*- 

MATLAB 

R2017a 


f \ 

[7] Enter the following commands one after another and watch the text output on your 

Command Window (see [ 8 ], next page, for the Command Window output). 


» 

VO = 

= 5 

» 

theta = pi/4 

» 

g = 

9.81 

» 

t = 

1 

» 

x = 

vO*cos(theta)*t 

» 

y = 

vO*sin(theta)*t-g*t A 2/2 


In the first command, a variable vO is created in the Workspace and a value 5 is 
assigned to the variable. 

In the second command, another variable theta is created and the value pi (which 
is a built-in constant with a value of 3.141592653589793) is divided by 4 and assigned to 
the variable. The third and fourth commands are self-explained. 

In the fifth command, x-position is calculated using Eq. (a). In the sixth command, 
y-position is calculated using Eq. (b). Note that cos and sin are MATLAB built-in 
functions; each takes radius as angular unit. —» 


v 
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« Command Window 


» vO = 5 

vO = 


^injxj 

© 


5 

» theta = pi/4 
theta = 

0.7854 
» g = 9.81 

g = 


9.8100 

» t = 1 

t = 


1 


» x = vO*cos(theta)*t 

x = 


3.5355 

» y = vO*sin(theta)*t-g*t~2/2 

y = 


-1.3695 


h 


» format compact 

» 


Command Window 


» vO = 5 
vO = 

5 

» theta = pi/4 
theta = 

0.7854 
» g = 9.81 

g = 

9.8100 

» t = 1 
t = 

1 

» x = vO*cos(theta)*t 
x = 

3.5355 

» y = vO*sin(theta)*t-g*t~2/2 

y = 

-1.3695 

h »I 


El 


Workspace ® 


Name L. 

Value 

is 

9.8100 


1 

i , theta 

0.7854 

_D v 0 

5 

±jx 

3.5355 

Sy 

-1.3695 
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vO = 5 

® d 

theta = pi/4 


g = 9.81 


t = 1 


x = vO*cos(theta)*t 


y = vO*sin(theta)*t-g*t A 2/2 


y = vO*sin(theta)*t-g A 2*t/2 


» y = vO*sin(theta)*t-g A 2*t/2| 


[mm - 
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^jnjxj 

ffl m b n - 


' Other uses of cos: svmbolic/cos 


Documentation 


< Al Products 

< MATLAB 

< Mathematics 

< Elementary Math 

< Trigonometry 

< MATLAB 

< Functions 


Syntax 
Description 
Examples 
Input Arguments 
Output Arguments 
More About 
See Also 


Search Documentation 


Dl 


COS 

Cosine of argument in radians 

Syntax 

Y = cos(X) 


Description 

Y = cos(x) returns the cosine for each element ofx. The cos function operates element¬ 
wise on arrays. The function accepts both real and complex inputs. For purely real values 
or imaginary values ofx, cos returns real values in the interval [-1,1], For complex values 
ofx, cos returns complex values. All angles are in radians. 


Examples 

c ollapse all 

▼ Plot Cosine Function 


Plot the cosine function over the domain -n <x<ir. 

Open This Example 

x = -pi:0.01:pi; 


plot(X,cos(x)) 


grid on 



Table 1.2 Rules for Variable Names 

Variable names are examples of identifier names, which include variable names and function names. The following 
are he rules for an identifier name: 

• A name contains only letters (A, a, B, b,... Z, z), digits (0, 1, 2,..., 9), and underscore (_). 

• A name must begin with a letter. 

• The maximum length of a name is 63. ( Type » namelengthmax to obtain this number.) 

• A name is case-sensitive; i.e., there is a difference between uppercase and lowercase letters. 

• It is legal, but not recommended, to use a built-in function name as a user-defined name. In that case, the built-in 
function is temporarily '’invisible.” 

• The following MATLAB keywords cannot be used as a name: ( Type » is keyword to obtain this list.) 

break case catch classdef continue else elseif 

end for function global if otherwise parfor 

persistent return spmd switch try while 
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1.3 Array Expressions 


( A 

[2] The following commands calculate the positions of the ball at 0 sec, 0.2 sec, 0.4 sec, 0.6 sec, 0.8 sec, and 1.0 sec. 

Your Command Window and Workspace Window should look like [3] and [4], respectively. 

» vO = 5; 

» theta = pi/4; 

» g = 9.81; 

» t = [0, 0.2, 0.4, 0.6, 0.8, 1] 

» x = v0*cos(theta)*t 
» y = v0*sin(theta)*t-g*t.^2/2 

v_ J 


Command Window 




© 

» vO = 5; 

» theta = pi/4; 

» g = 9.81; 

» t = [0, 0.2, 0.4, 0.6, 0.8, 1] 

t = 





0 0.2000 0.4000 

» x = vO*cos(theta)*t 

x = 

0.6000 

0.8000 

1.0000 


0 0.7071 1.4142 

» y = vO*sin(theta)*t-g*t . ^2/2 

y = 

2.1213 

2.8284 

3.5355 


0 0.5109 0.6294 

fx » 

0.3555 

-0.3108 

-1.3695 
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1.4 Data Visualization: Line Plots 


f \ 

[2] Following commands draw a trajectory of a ball (see [3]). 


v 


» clear, clc 

» vO = 5; theta = pi/4; g = 9.81; 
» t = 0:0.02:1; 

» x = v0*cos(theta)*t; 

» y = v0*sin(theta)*t-g*t.^2/2; 

» plot(x, y) 

» title('Trajectory of a Ball') 

» xlabel('Distance (m)') 

» ylabel('Height (m)') 




^jnjxj 


File Edit View Insert Took Desktop Window Help 


’JeJi 


® C. 


I | □ Id I ■ o 


Trajectory of a Ball 
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» t = 0:0.02:1 


Columns 1 

through 5 

0 

0.0200 

Columns 6 

through 10 

0.1000 

0.1200 

Columns 11 

through 15 

0.2000 

0.2200 

Columns 16 

through 20 

0.3000 

0.3200 

Columns 21 

through 25 

0.4000 

0.4200 

Columns 26 

through 30 

0.5000 

0.5200 

Columns 31 

through 35 

0.6000 

0.6200 

Columns 36 

through 40 

0.7000 

0.7200 

Columns 41 

through 45 

0.8000 

0.8200 

Columns 46 

through 50 

0.9000 

0.9200 

Column 51 


1.0000 



.0400 

0.0600 

0.0800 

.1400 

0.1600 

0.1800 

.2400 

0.2600 

0.2800 

.3400 

0.3600 

0.3800 

.4400 

0.4600 

0.4800 

.5400 

0.5600 

0.5800 

.6400 

0.6600 

0.6800 

.7400 

0.7600 

0.7800 

.8400 

0.8600 

0.8800 

.9400 

0.9600 

0.9800 


0 

0 

0 

0 

0 

0 

0 

0 

0 

0 
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3-D Line Plots 

[10] The function plot3(x,y,z) produces a curve in the 3-D space. The curve is produced by connecting the 
following data points with straight line segments: 

O(0> y(i), i = 1, 2, ...n 

As an example, following commands draw a spiral curve as shown in [11]. 

» clear, clc, close 
» theta = 0 spi/ 100 : 8 *pi; 

» x = cos(theta); 

» y = sin(theta); 

» z = theta/( 8 *pi); 

» plot3(x, y, z) 

Note that the close command in the first line closes the ’’current” Figure Window ([3], page 19). 

v_ ) 




^jnjxj 

File Edit Yiew Insert 

Took Desktop Window Help 


C J 0 A £ | 

I \ s O ® ’ | Q | □ S | ■ 0 
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1.5 MATLAB Scripts 


MATLAB R2017a - prerelease use 

HOME PLOTS APPS 


m Search Documentation 




* a 

m 

rg Find Files 


Insert gg, fx g] ~ 

i> m 

1^1 Run Section .1^ 




Compare 

» c, Go To ▼ Comment % c-> '1 




New Open 

Save 

Source ^ 


Breakpoints 

Run Run and 

E.- Advance Run and 




Control ^ Print ■» 

^ Find » 

lndent GO m 4$ 

» Advance 

Time 




FILE 

NAVIGATE 

EDIT BREAKPOINTS 


RUN 

jk. 


► C: ► Users ► Lee 

► Documents ► 

MATLAB ► ChapterOl 



- P 


Current Folder 
jName ~ 


* Example01 05.m 


±U 

9.8100 

=Bt 

1x51 double 

2 theta 

0.7854 

JH vO 

5 


1x51 double 

■By 

1x51 double 


® 


A 


Workspace 


® 

Name /. 

|Value 

nr 


5 Editor - C:\UsersVLee\Documents\MATLABVChapter01\Example01_05.iii 


Example01_05.m + 


1 - 
2 - 

3 - 

4 - 

5 - 

6 - 

7 - 

8 - 
9 - 


clear, clc 

vO = 5; theta = pi/4; g = 9.81 
t = 0:0.02:1; 
x * vO*cos(theta)*t; 
y = v0*sin(theta)*t-g*t. A 2/2; 
plot(x, y) 

title( 'Trajectory of a Ball') 
xlabel( ' Distance (m)' ) 
ylabel(' Height (m)' ) 


n 


Command Window 

/* » 






File Edit View Insert Took Desktop Window Help 


"J e A . j Cs ssOSC ti - ai □ B| ■ O 


Trajectory of a Ball 
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editor - C:\Users\Lee\Documents\IvlATLABVCh8ptei01\Ex8jnple01_05.in ® 

X 



Example01_05.m + 


1 

- 

clear, clc 


□ 

2 

- 

vO = 5; theta = pi/4; g = 9.81; 



3 

- 

t = 0:0.02:1 


- 

4 


x = vO*cos( theta*t^ 


- 

5 

- 

y = vO*sin(theta)*t-g*t, A 2/2; 



6 

- 

plot(x, y) 



7 

- 

title( 'Trajectory of a Ball') 



8 

- 

xlabel( Distance (m) ' ) 



9 


ylabel( Height (m) ' ) 
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% This is a program to calculate 
% and plot the trajectory of a ball 

clear, clc % clear Workspace and Command Window 

% Initial speed vO, m/s 
% Elevation angle theta, radians 
% Gravitational acceleration g, m/s A 2 
vO = 5; theta = pi/4; g = 9.81; 

t = 0:0.02:1; % The time ranges from 0 sec to 1 
x = v0*cos(theta)*t; % x-coordinates 
y = v0*sin(theta)*t-g*t.~2/2; % y-coordinates 

% Plot the trajectory 

plot(x, y) 

title( 'Trajectory of a Ball') 
xlabel (' Distance (m)' ) 
ylabel( 'Height (m)' ) 


sec 
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1.6 Data Visualization: Surface Plots 


r 


Example01_06.m: Trajectory Surface 

[2] Create a new script (1.5[2], page 22), type the following commands (the number before each line is added by the 
author and is not part of the command), save as Example01_06.m (1.5[6]), and run the script (1.5[8]). The graphic 
output is shown in [3-5]. We’ll explain these lines in [9-19]. 

1 clear, clc, close all 

2 v0=5;g=9.81; 

3 time = 0:0.01:1; n = length(time); 

4 theta = pi/8:pi/200:3*pi/8; m = length(theta); 

5 Time = repmat(time, m, 1); 

6 Theta = repmat(theta', 1, n); 

7 X = v0*cos(Theta).*Time; 

8 Z = v0*sin(Theta).*Time-g*Time. A 2/2; 

9 surf(X, Theta, Z) 


10 hold on 

11 Z = zeros(m, n); 

12 mesh(X, Theta, Z) 



^injxj 


File Edit View Insert Tools Desktop Window Help 


P J A £ 1 | % % f ■' ® £? » | Q, | |~D~ Id | m O 


13 xlabel('Distance (m)') 

14 ylabel('Angle (radian)’) 

15 zlabel('Height (m)’) 

16 colorbar 

17 axis vis3d 


v 



Angle (radian) 0.2 o 


Distance (m) 
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1.7 Symbolic Mathematics 



Example01_07.m: Ball-Throwing Ranges 

[3] Create a new script, type the following commands, save as Example01_07.m, 
and mn the script. 


1 clear, clc, close all 

2 syms vO theta g t 

3 x = vO*cos(theta)*t 

4 y = vO*sin(theta)*t-g*t A 2/2 

5 solutions = solve(y, t) 

6 tO = solutions(2) 

7 range = subs(x, t, tO) 

8 range = simplify(range) 

9 range = subs(range, [vO, g], [5, 9.81]) 

10 func = matlabFunction(range) 

11 theta = [pi/8:pi/200:3*pi/8]; 

12 range = func(theta); 

13 plot(theta*180/pi, range) 

14 title('Range as Function of Angle') 

15 xlabel('Elevation angle (degrees)') 

16 ylabel('Range (m)') 
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17 x = 

18 t*vO*cos(theta) 

19 y = 

20 t*v0*sin(theta) - (g*t A 2)/2 

21 solutions = 

22 0 

23 (2*v0*sin(theta))/g 

24 tO = 

25 (2*v0*sin(theta))/g 

26 range = 

27 (2*v0^2*cos(theta)*sin(theta))/g 

28 range = 

29 (v0~2*sin(2*theta))/g 

30 range = 

31 (2500*sin(2*theta))/981 

32 func = 

function handle with value: 


33 

34 


@(theta)sin(theta.*2.0).*2.54841997961264 
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Workspace 

® 

Name L. 

Value 

kj\ fmic 

@ (theta)sin(theta. *2.0). *2 .... 


lxl 5J7E 

grange 

1x51 double 

£ solutions 

2x1 SITE. 

fill 

lxl sym 

£ to 

lxl sym 

, theta 

1x51 double 

©j vO 

lxl S}TR 

j£j X 

lxl 53uz 

£jy 

lxl S}TR 
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1.8 Live Script 


Current Folder 


Name L. 

* Ex8mple01 02.i: 


5 


Example01_03.m 
Example01_04.m 
Example01_05.m 
* Example01_06.m 


[ LIVE 

jjy © (?) | Search Documentation 

”p| 

j=j 2 Equation ▼ 

(p Hyperlink 

Code Text Section 

$ Break [gj-j Image Normal 

T INSERT 

Run Section 

AaBbCc ^ r* n 

w V,- Run and Advance 

Run 

Heading Title All {§4 Run to End 

TE/TSTV.E RUN 


.TLAB ► MATLAB2017 ► Examples ► ChapteiOl 



- 

B Live Editor - Exajnple01_07.mlx * 




Example01_07.mlx * + 

clear, clc, close all 

x = tv o cos( 0 ) 

HE 

n 

syms v0 theta g t 

y = 



x = vO*cos(theta)*t 




y = v 0 *sin(theta)*t-g*t A 2/2 

t v 0 sin( 6) - £-L 



solutions = solve(y, t) 

2 



tO = solutions( 2 ) 

solutions = 



range = subs(x, t, t 0 ) 

/ 0 \ 



range = simplify(range) 

I 2 v o sin( 0 ) 1 



range = subs(range, [v0,g], (5,9.81]) 



func = matlabFunction(range) 

V 9 / 



theta = Xpi/ 8 :pi/200:3*pi/8]; 

t 0 = 



range = func(theta); 

2 v o sin( 0 ) 



plot(theta + 180/pi, range) 



title( 'Range as Function of Angle 1 ) 

9 



xlabel( 1 Elevation angle (degrees) 1 ) 

range = 



yl|abel( 'Range (m)') 





2 Vp" cos (d 1 sinltfj 




9 




range = 




v 0 : sin (2 6) 




9 




range = 




2500sin(2 6) 




981 




func = functionhandle 




@( theta ) sin(theta.*2.0).*2.548419979612 



Rango m Function olAngl* 

2« 




25 




24 


- 
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Range of a Ball 

This program symbolically calculates the range of a ball throwing with 
an initial speed of v 0 and an elevation angle of 6. 

clear, clc, close all % Housekeeping 

Trajectory of the ball, (x, y) 

Initial speed v 0 , elevation angle d. gravitational acceleration g, time t 
x= ( VqCos0 J t, y — (v o sin0)t 

syms vO theta g t 

x = v0 + cos(theta)*t 

y = v0*sin(theta)*t-g*t A 2/2 

Time to hit the ground, tg 

Solve the equation y - 0 for t 
solutions = solve(y, t) 

tO = solutions(2) % The first solution is 0 

Range of the ball, R = x(to) 

range = subs(x, t, tO) % range = x(t0) 

range = simplify(range) 

range = subs(range, [vO, gl, [5, 9.81]) 

Numerical values Rid), 6 = — to LL 

8 8 

func = matlabFunction(range) 
theta = Xpi/8:pi/200:3*pi/8]; 
range = func(theta); 

R -versus -6 plot 

plot(theta 4 180/pi, range) 
title( 'Range as Function of Angle') 
xlabel( 1 Elevation angle (degrees)') 
ylabel( 'Range (m) 1 ) 
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1.9 Screen Text Input/Output 


r % 

Example01_09.m: Trajectory Table 

[2] Create a new file, type the following commands, save as Example01_09.m, and run the script. 
Enter 5 for the initial velocity and 45 for the elevation angle (see [3]). 

1 clear 

2 vO = input('Enter initial speed (m/s): '); 

3 theta = input('Enter elevation angle (degrees): '); 

4 theta = theta*pi/180; 

5 g = 9.81; 

6 t = 0 : 0.1:1; 

7 x = vO*cos(theta)*t; 

8 y = vO*sin(theta)*t-g*t. A 2/2; 

9 Table = [t', x', y']; 

10 disp(' ') 

11 disp(' time (s) x (m) y (m)') 

12 disp(Table) 

v_ ) 


Workspace 

® 

Name L. 

Value 


9.8100 


TrIT rfnnhle 

i , Table 

11x3 double 

~n theta 

0.7854 

SvO 

5 


1x11 double 

Sy 

lxll double 
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time (s) 

x (m) 

y (m) 

o 

o 

0.000 

0.000 

0.1 

0.354 

0.305 

0.2 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.763 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

0.8 

2.823 

-0.311 

0.9 

3.182 

-0.791 

1.0 

3.536 

-1.369 



Editor - ExampleOl 09 .m 

D 

r 

Table 




1 : i 11x3 double 





1 

2 

3 

4 

1 

0 

0 

0 



2 

0.1000 

0.3536 

0.3045 



3 

0.2000 

0.7071 

0.5109 



4 

0.3000 

1.0607 

0.6192 



5 

0.4000 

1.4142 

0.6294 



6 

0.5000 

1.7678 

0.5415 



7 

0.6000 

2.1213 

0.3555 



8 

0.7000 

2.4749 

0.0714 



9 

0.8000 

2.8284 

-0.3108 



10 

0.9000 

3.1820 

-0.7911 



11 

1 

3.5355 

-1.3695 



12 





— 

13 





14 
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Workspace 


Name L. 

| Value 

3 J* 

9.8100 

It 

Jxll doubie 

Table 

11x3 double 

Bjfflgj 

3x11 double 

±1 theta 

0.7854 

3JvO 

5 


JxiJ double 

jjy 

lxll double 


\j?\ Editor - Ex»jnple0109 m 


Variables - Table 1 


Table 1 

ffl 3x11 double 



1 


2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

1 

0 

0.1000 

0.2000 

0.3000 

0.4000 

0.5000 

0.6000 

0.7000 

0.8000 

0.9000 

1 

2 

0 

0.3536 

0.7071 

1.0607 

1.4142 

1.7678 

2.1213 

2.4749 

2.8284 

3.1820 

3.5355 

3 

0 

0.3045 

0.5109 

0.6192 

0.6294 

0.5415 

0.3555 

0.0714 

-0.3108 

-0.7911 

-1.3695 

4 
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1.10 Text File Input/Output 


ExampleOl lO.m: Text File I/O 

[2] Create a new script, type the following commands, save as Example01_10.m, and run the script. This program 
demonstrates input/output of a text file. 

1 clear 

2 vO = 5; theta = pi/4; g = 9.81; 

3 t = 0 : 0.1:1; 

4 x = vO*cos(theta)*t; 

5 y = vO*sin(theta)*t-g*t. A 2/2; 

6 Table = [t; x; y]; 

7 % Write to a file 

8 file = fopen('Datafile01_10.dat', 'w+'); 

9 fprintf(file, ' Time (s) x (m) y (m)\n'); 

10 fprintf(file, '%10.1f %9.3f %9.3f\n'. Table); 

11 fclose(file); 

12 % Read from the file 

13 clear 

14 file = fopen('Datafile01_10.dat', 'r'); 

15 fscanf(file, ' Time (s) x (m) y (m)\n'); 

16 Table = fscanf(file, '%f %f %f\n', [3,11]); 

17 fclose(file); 

18 % Print on the screen 

19 fprintf(' Time (s) x (m) y (m)\n'); 

20 fprintf('%10.If %9.3f %9.3f\n'. Table); 

v_ ) 


» Example01_10 


Time (s) 

x (m) 

y (m) 

o 

o 

0.000 

0.000 

0.1 

0.354 

0.305 

0.2 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.768 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

o 

CO 

2.828 

-0.311 

0.9 

3.182 

-0.791 

1.0 

3.536 

-1.369 


» 
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Current Folder 


Name L. 


I DatafileOl 10.dat 


* Example01_02.m 
Example01_03.m 
Example01_04a.m 
Example01_04b.m 
Example01_05.m 
Example01_05a.m 
Example01_06.m 

**) Example01_07.m 

* Example01_08.mlx 

* Example01_09.m 
Example01_10.m 


1 


Open 

Show Details 

Enter 

Open as Text 


Open Outside MATLAB 

Show in Explorer 

Import Data... 


Create Zip File 

Rename 

F2 

Delete 

Delete 

Compare Selected Files/Folders 

Compare Against 

► 

Cut 

Ctrl+X 

Copy 

Ctrl+C 

( Paste 

Ctrl+V 

v' Indicate Files Not on Path 




Example01_10.m 

DatafileOl. 

_10.dat + 

1 

Time (s) 

x (m) 

y (m) 

2 

0.0 

0.000 

0.000 

3 

0.1 

0.354 

0.305 

4 

0.2 

0.707 

0.511 

5 

0.3 

1.061 

0.619 

6 

0.4 

1.414 

0.629 

7 

0.5 

1.763 

0.542 

8 

0.6 

2.121 

0.356 

9 

0.7 

2.475 

0.071 

10 

0.8 

2.828 

-0.311 

11 

0.9 

3.182 

-0.791 

12 

1.0 

3.536 

-1.369 

13 
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1.11 Debug Your Programs 41 


1.11 Debug Your Programs 


MATLAB R2017a 



6 
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Paused in debugger 
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S Editor - C:\Users\Lee\DocwmentsM4ATLABVChapter01\Ex8Jnple01_10.m 




1 

2 

3 

4 

5 

6 
7 

e 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 



% Write to a file 

file = fopen ( 'Datafile01_10.dat' , 'w+'); 

fprintf(file, ' Time (s) x (m) y (m)\n‘); 

fprintf(file, '%10.1f %9.3f %9.3f\n'. Table); 
fclose(file); 

% Read from the file 
clear 

file = fopen ('Datafile01_10.dat' , 'r'); 

fscanf(file, ' Time (s) x (m) y (m)\n*); 

Table = fscanf(file, *%f %f %f\n', [3,11]); 
fclose (file); 

% Print on the screen 

fprintf ( ' Time (s) x (m) y (m)\n'); 

fprintf ( '%10.If %9.3f %9.3f\n'. Table); 


T3 


Evaluate Selection 

F9 

Open Selection 

Ctrl+D 

Help on Selection 

FI 

Cut 

Ctrl+X 

Copy 

Ctrl+C 

Paste 

Ctrl+V 

Select All 

Ctrl+A 

Wrap Comments 

Ctrl+J 

Comment 

Ctrl+R 

Uncomment 

Ctrl+T 

Smart Indent 

Ctrl+I 

Evaluate Current Section 

Insert Section Breaks Around Selection 

Ctrl+Enter 

Insert Text Markup 

► 

Function Browser 

Shift+Fl 

Function Hints 

Ctrl+Fl 

Code Folding 

► 

Split Screen 

► 
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1.12 Binary File Input/Output 


Example01_12.m: Binary File I/O 

[2] Create a new script, type the following commands, save as Example01_12.m, 
and run the script. This program demonstrates input/output of a binary file. 


1 clear 

2 vO = 5; theta = pi/4; g = 9.81; 

3 t = 0 : 0.1:1; 

4 x = vO*cos(theta)*t; 

5 y = vO*sin(theta)*t-g*t. A 2/2; 

6 Table = [t; x; y]; 

7 % Write to a file 

8 save('Datafile01_12'); 

9 % Read from the file 

10 clear 

11 load('Datafile01_12'); 

12 % Print on the screen 

13 fprintf(' Time (s) x (m) 

14 fprintf('%10.If %9.3f %9.3f\n'. 


» Example01_12 


Time (s) 

x (m) 

y (m) 

0.0 

0.000 

0.000 

0.1 

0.354 

0.305 

CM 

O 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.768 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

00 

O 

2.828 

-0.311 

0.9 

3.182 

-0.791 

1.0 

3.536 

-1.369 


Y ( m )\n'); 
Table); 
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1.13 Images and Sounds 


Example01_13.m: Images and Sounds 

[2] This program displays an image [4], plays a song, and plots the 
audio signals of the song [5]. 


1 clear 

2 Photo = imread('peppers.png'); 

3 image(photo) 

4 axis image 

5 load handel 

6 sound(y, Fs) 

7 figure 

8 plot(y) 



50 100 150 200 250 300 350 400 450 500 



Workspace 


Name a 

Value 

EBfs 

8192 

EB Photo 

384x512x3 uint8 

fflv 

73113x1 double 
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1.14 Flow Controls 47 


1.14 Flow Controls 


/■ \ 

Example01_14.m: For-Loops 

[2] Create a new script, type the following commands, save as Example01_14.m, and run the script. 

1 clear 

2 vO = 5; theta = pi/4; g = 9.81; 

3 t = 0 : 0.1:1; 

4 x = vO*cos(theta)*t; 

5 y = vO*sin(theta)*t-g*t. A 2/2; 

6 fprintf('\n Time (s) Distance (m) Height (m)\n') 

7 for k = lslength(t) 

8 fprintf('%10.If %9.3f %9.3f\n', t(k), x(k), y(k)) 

9 end 

v_ J 


» Example01_14 


Time (s) 

x (m) 

y (m) 

0.0 

0.000 

0.000 

0.1 

0.354 

0.305 

0.2 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.768 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

o 

00 

2.828 

-0.311 

cn 

O 

3.182 

-0.791 

1.0 

3.536 

-1.369 


» 
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1.15 User-Defined Functions 


Example01_15a.m: User-Defined Functions 

[2] Create a program like this, save as Example01_15a.m, and run the program. This program demonstrates the creation 
and use of user-defined functions. 

1 clear, global g 

2 vO = 5; theta = pi/4; g = 9.81; 

3 t = 0 : 0.1:1; 

4 [distance, height] = trajectory(vO, theta, t); 

5 printTable(t, distance, height); 

6 

7 function [x, y] = trajectory(vO, angle, time) 

8 global g 

9 x = vO*cos(angle)*time; 

10 y = v0*sin(angle)*time-g*time.^2/2; 

11 end 

12 

13 function printTable(t, x, y) 

14 fprintf(' Time (s) x (m) y (m)\n'); 

15 for k = l:length(t) 

16 fprintf('%10.If %9.3f %9.3f\n', t(k), x(k), y(k)) 

17 end 

18 end 

V_ ) 
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» ExampleOl 
Time (s) 
0.0 
0.1 
0.2 
0.3 
0.4 
0.5 
0.6 
0.7 
0.3 
0.9 
1.0 


(m) 

y (m) 

000 

0.000 

354 

0.305 

707 

0.511 

061 

0.619 

414 

0.629 

768 

0.542 

121 

0.356 

475 

0.071 

828 

-0.311 

182 

-0.791 

536 

-1.369 


15a 

x 

0 

0 

0 

1 

1 

1 

2 

2 

2 

3 

3 


» 
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f \ 

ExampleO 1_15b.m: A Program with Input Arguments 

[13] Create a program like this, save as ExampleO 115b.m, and run the program by typing (see [14]) 

» ExampleOl_15b(5, pi/4) 

This program demonstrates the creation of a user-defined command with input arguments, here, vO and theta. Note 
that the dimmed statements are copied from ExampleO 115a.m. 

19 function Example01_15b(vO, theta) 

20 global g 

21 g = 9.81; 

22 t = 0:0.1:1; 

23 [distance, height] = trajectory(vO, theta, t); 

24 printTable(t, distance, height); 

25 end 

26 

27 function [x, y] = trajectory(vO, angle, time) 

28 global g 

29 x = v0*cos(angle)*time; 

30 y = v0*sin(angle)*time-g*time. A 2/2; 

31 end 

32 

33 function printTable(t, x, y) 

34 fprintf(' Time (s) x (m) y (m)\n'); 

35 for k = l:length(t) 

36 fprintf('%10.If %9.3f %9.3f\n', t(k), x(k), y(k)) 

37 end 

38 end 

v_ J 


» Example01_15b(5, pi/4) 


Time (s) 

x (m) 

y (rn) 

o 

o 

0.000 

0.000 

0.1 

0.354 

0.305 

CM 

O 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.763 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

o 

CO 

2.828 

-0.311 

0.9 

3.182 

-0.791 

1.0 

3.536 

-1.369 


» 
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1.16 Cell Arrays 


» Example01_16 

Initial velocity = 5 m/s 

Elevation angle = 45 degrees 


Example01_16.m: Cell Arrays 

[2] Create a program like this and run the program. 

This program demonstrates the creation and use of cell arrays. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 


clear 

vO = 5; theta = pi/4; g = 9.81; 
t = 0 : 0.1:1; 
x = vO*cos(theta)*t; 
y = v0*sin(theta)*t-g*t. A 2/2; 
Trajectory = {vO, theta, t, x, y}; 
printTrajectory(Trajectory) 


Time (s) 

x (m) 

y (m) 

o 

o 

0.000 

0.000 

0.1 

0.354 

0.305 

0.2 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.768 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

0.8 

2.828 

-0.311 

0.9 

3.182 

-0.791 

1.0 

3.536 

-1.369 


function printTrajectory(Traj) 

fprintf('Initial velocity = %.0f m/s\n', Traj{l}) 

fprintf('Elevation angle = %.0f degrees\n\n', Traj{2}*180/pi) 

fprintf(' Time (s) x (m) y (m)\n'); 

for k = l:length(Traj{3}) 

fprintf('%10.If %9.3f %9.3f\n', Traj{3}(k), Traj{4}(k), Traj{5} 

end 

end 


(k)) 


v 
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1.17 Structures 


» Example01_17 
Initial velocity = 5 m/s 
Elevation angle = 45 degr 


Example01_17.m: Structures 

[2] Create a program like this and run the program. 

This program demonstrates the creation and use of structures. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 


g = 9.81; 


Time (s) 

x (m) 

y (m) 

o 

o 

0.000 

0.000 

0.1 

0.354 

0.305 

CM 

O 

0.707 

0.511 

0.3 

1.061 

0.619 

0.4 

1.414 

0.629 

0.5 

1.763 

0.542 

0.6 

2.121 

0.356 

0.7 

2.475 

0.071 

o 

CO 

2.828 

-0.311 

0.9 

3.182 

-0.791 

1.0 

3.536 

-1.369 


clear 

vO = 5; theta = pi/4; 
t = 0 : 0.1:1; 
x = v0*cos(theta)*t; 
y = v0*sin(theta)*t-g*t. A 2/2; 
Trajectory.velocity = vO; 
Trajectory.angle = theta; 
Trajectory.time = t; 
Trajectory.distance = x; 
Trajectory.height = y; 
printTrajectory(Trajectory) 


function printTrajectory(Traj) 

fprintf('Initial velocity = %.0f m/s\n', Traj.velocity) 
fprintf('Elevation angle = %.0f degrees\n\n', Traj.angle*180/pi) 
fprintf(' Time (s) x (m) y (m)\n'); 

for k = 1:length(Traj.time) 

fprintf('%10.If %9.3f %9.3f\n', ... 

Traj.time(k), Traj.distance(k), Traj.height(k)) 

end 

end 


V 
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1.18 Graphical User Interfaces (GUI) 

Example01_18.m: GUI 

[2] Create a program like this and run the program. This program creates a GUI 
as shown in [3-6], next page. —» 

1 clear 

2 global g velocityBox angleBox 

3 g = 9.81; 

4 figure('Position' , [30,70,500,400]) 

5 axes('Units', 'pixels', ... 

6 'Position', [50,80,250,250]) 

7 axis([0, 10, 0, 10 ] ) 

8 xlabel('Distance (m)'), ylabel('Height (m)') 

9 title('Trajectory of a Ball') 

10 

11 uicontrol('Style', 'text', ... 

12 'String', 'Initial velocity (m/s)', ... 

13 'Position', [330,300,150,20]) 

14 velocityBox = uicontrol('Style', 'edit', ... 

15 'String', '5', ... 

16 'Position', [363,280,80,20]); 

17 uicontrol('Style', 'text', ... 

18 'String', 'Elevation angle (deg)', ... 

19 'Position', [330,240,150,20]) 

20 angleBox = uicontrol(’Style’, 'edit', ... 

21 'String', '45', ... 

22 'Position', [363,220,80,20]); 

23 uicontrol('Style', 'pushbutton', ... 

24 'String', 'Throw', ... 

25 'Position', [363,150,80,30], ... 

26 'Callback', @pushbuttonCallback) 

27 

28 function pushbuttonCallback(pushButton, ~) 

29 global g velocityBox angleBox 

30 vO = str2double(velocityBox.String); 

31 theta = str2double(angleBox.String)*pi/180; 

32 tl = 2*v0*sin(theta)/g; 

33 t = 0:0.01:tl; 

34 x = v0*cos(theta)*t; 

35 y = v0*sin(theta)*t-g*t.~2/2; 

36 hold on 

37 comet(x, y) 

38 end 

V_ ) 
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1.19 GUIDE 
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1 


% - Executes just before Example01_19 is made visible. 

function Example01_19_OpeningFcn(hObject, eventdata, handles, varargin) 
This function has no output args, see OutputFcn. 

% hObject handle to figure 

% eventdata reserved - to be defined in a future version of MATLAB 
% handles structure with handles and user data (see GUIDATA) 

% varargin command line arguments to ExampleOl 19 (see VARARGIN) 


% Choose default command line output for Example01_19 

handles.output = hObject; 

% Update handles structure 

guidata(hObject, handles); 

% UIWAIT makes Example01_19 wait for user response (see UIRESUME) 
% uiwait(handles.figurel); 

axis ([0, 10, 0, 10]) 

xlabel (' Distance (m)' ), ylabel (' Height (m)' ) 
title( 'Trajectory of a Ball') 


□ function editl^CreateFen (hOb j ect, eventdata , handles ) 

R% hObject handle to editl (see GCBO) 

% eventdata reserved - to be defined in a future version of MATLAB 
- % handles empty - handles not created until after all CreateFcns called 

% Hint: edit controls usually have a white background on Windows. 

% See ISPC and COMPUTER. 

if ispc && isequal(get(hObject, 'BackgroundColor ') , get(0, 'defaultUicontrolBackgroundColor' )) 
set(hObject, 'BackgroundColor' , 'white' ) ; 

end 

global velocityBox 
L velocityBox = hObject; 


% - Executes during object creation, after setting all properties. 

function edit2 M CreateFcn (hObject, eventdata , handles) 

;]% hObject handle to edit2 (see GCBO) 

% eventdata reserved - to be defined in a future version of MATLAB 
% handles empty - handles not created until after all CreateFcns called 


% Hint: edit controls usually have a white background on Windows. 


% See ISPC and COMPUTER. 

if ispc && isequal(get(hObject, 'BackgroundColor '), 
set(hObject, 1 BackgroundColor' , 'white' ); 


get (0, ’ defaultUicor.trolBackcroundColor* )) 


end 

global angleBox 
L angleBox = hObject; 
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% - Executes on button press in pushbuttonl. 

function pushbuttonl^Callback (hObject, eventdata , 
d % hObject handle to pushbuttonl {see GCBO) 

% eventdata reserved - to be defined in a future 
% handles structure with handles and user data 
global velocityBox angle3ox 
g = 9.81; 

vO = str2double (velocityBox. String); 

theta = str2double (angleBox. String)*pi/180; 

tl = 2*v0*sin(theta)/g; 

t = 0:0.01:tl; 

x = v0*cos (theta)*t; 

y = vQ*sin(theta)*t-g*t.^2/2; 

hold on 

comet(x f y) 



E 


Example01_20 


^JSJxJ 


Trajectory of a Ball 



initial velocity (rrVs) 



Elevation angle (deg) 



! Throw 

! I 


handles) 

version of MATLAB 
(see GUIDATA) 
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Design View Code View 
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% Button pushed function: ThrowButton 
function ThrowButtonPushed(spp, event) 

end 


% Button pushed function: ThrowButton 
function ThrowButtonPushed(app, event) 
g = 9.81; 

vO = app.VelocityEditField.Value; 
theta = app.AngleEditField.Value*pi/180; 
tl = 2*v0*sin(theta)/g; 
t = 0:0.01:tl; 
x = vO A cos(theta)*t; 
y = vO*sin(theta)*t-g*t.^2/2; 
hold(app.UIAxes, 'on') 
comet(app.UIAxes, x, y) 


end 
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Chapter 2 

Data Types, Operators, and Expressions 


An expression is a syntactic 
combination of numbers, 
variables, operators, and 
functions. An expression 
always results in a value. The 
right-hand side of an 
assignment statement is always 
an expression. You may notice 
that most of the statements we 
demonstrated in Chapter 1 are 
assignment statements. It is 
fair to say that expressions are 
the most important building 
block of a program. 
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2.1 Unsigned Integers 69 


2.1 Unsigned Integers 
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Example02_01.m: Unsigned Integers 

[5] These statements demonstrates the concepts given in the last page. A Command Window session is shown in [6]. 


1 

clear 





2 

d = 75 

6 

» clear 



3 

u = uint8(d) 

7 

» d = 75 



4 

bits = bitget(u, 1:8) 

8 

d = 



5 

bits = fliplr(bits) 

9 

75 





10 

» u = uint8(d) 





11 

u = 





12 

uint8 





13 

75 





14 

» bits = bitget(u, Is 

8) 




15 

bits = 





16 

1x8 uint8 row vector 





17 

110 10 

0 

1 0 



18 

» bits = fliplr(bits) 





19 

bits = 





20 

1x8 uint8 row vector 





21 

0 10 0 1 

0 

1 1 



22 

» 










Table 2.1 Unsigned Integer Numbers 

Conversion 

Function 

Function to find the 
minimum value 

Minimum value 

Function to find the 
maximum value 

Maximum value 

uint8 

intmin('uint8') 

0 

intmax('uint8') 

255 

uintl6 

intmin('uintl6') 

0 

intmax('uintl6') 

65535 

uint32 

intmin('uint32') 

0 

intmax('uint32') 

4294967295 

uint64 

intmin('uint64') 

0 

intmax('uint64') 

18446744073709551615 

Details and More: Help>MATLAB>Language Fundamentals>Data Types>Numeric Types 
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2.2 Signed Integers 


Table 2.2a Unsigned/Signed 
Representation 

Bit pattern 

Unsigned 

value 

Signed 

value 

000 

0 

0 

001 

1 

1 

010 

2 

2 

Oil 

3 

3 

100 

4 

-4 

101 

5 

-3 

110 

6 

-2 

111 

7 

-1 

00000000 

0 

0 

11111111 

255 

-1 

01111111 

127 

127 

10000000 

128 

-128 

Details and More: 
Wikipedia>Two's complement 


Table 2.2b Signed Integer Numbers 

Conversion 

Function 

Function to find the 
minimum value 

Minimum value 

Function to find the 
maximum value 

Maximum value 

int8 

intmin('int8') 

-128 

intmax('int8') 

127 

inti 6 

intmin('inti6') 

-32768 

intmax('inti6') 

32767 

int32 

intmin('int32') 

-2147483648 

intmax('int32') 

2147483647 

int64 

intmin('int64') 

-9223372036854775808 

intmax('int64') 

9223372036854775807 

Details and More: Help>MATLAB>Language Fundamentals>Data Types>Numeric Types 
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Example02_02.m: Signed Integers 

[3] These statements demonstrates some concepts about signed integers. A Command Window session is shown in [4]. 


1 clear 

2 d = 200 

3 u = uint8(d) 

4 bits = fliplr(bitget(u, 1:8)) 

5 t = int8(u) 

6 a = intl6(u) 

7 s = typecast(u, 'int8') 

8 bits = fliplr(bitget(s, 1:8)) 


9 » clear 

10 » d = 200 

11 d = 

12 200 

13 » u = uint8(d) 

14 u = 

15 uint8 

16 200 

17 » bits = fliplr(bitget(u, 1:8)) 

18 bits = 

19 1x8 uint8 row vector 

20 11001000 

21 » t = int8(u) 

22 t = 

23 int8 

24 127 

25 » a = intl6(u) 

26 a = 

27 int!6 

28 200 

29 » s = typecast(u, 'int8') 

30 s = 

31 int8 

32 -56 

33 » bits = fliplr(bitget(s, 1:8)) 

34 bits = 

35 1x8 int8 row vector 

36 11001000 
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2.3 Floating-Point Numbers 


exponent 
sign (11 bit) 


fraction 
(52 bit) 



o o o 


63 52 


0 



Table 2.3a Floating-Point Numbers 


Conversion 

Function to find the 

Minimum value 

Function to find the 

Maximum value 

Function 

minimum value 

maximum value 

double 

realmin('double') 

2.2251e-308 

realmax('double') 

1.7977e+308 

single 

realmin('single') 

1.1755e-38 

realmaxf'single') 

3.4028e+38 

Details and More: Help>MATLAB>Language Fundamentals>Data Types>Numeric Types 
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Example02_03a.m: Floating-Point Numbers 

[3] These statements confirm that the decimal number 28 is indeed represented by the bit pattern in [1], last page. A 
Command Window session is shown in [4]. 

1 clear 

2 d = 28 

3 a = typecast(d, 'uint64') 

4 b = dec2bin(a, 64) 

Line 2 creates a double-precision floating-point number 28 and stores it in the variable d. The bit pattern supposedly is 
the one in [1], last page. 

In line 3, the function typecast preserves the 64-bit pattern while change its type to uint64. Now, the bit 
pattern is interpreted as a value of 4628574517030027264 (see line 12), which can be calculated by 

2 62 + 2 53 + 2 52 + 2 51 + 2 50 = 4628574517030027264 

Line 4 demonstrates another way (than using bitget and f liplr) to display the bit pattern. The function 
dec2bin (a, 64 ) retrieves the bit pattern from an integer number a and outputs the bit pattern in a text form (i.e., a 
string, to be introduced in the next section). The result is shown in line 15, the same as the one in [1], last page. 

V_ ) 


5 » clear 

6 » d = 28 

7 d = 

8 28 

9 » a = typecast(d, 'uint64') 

10 a = 

11 uint64 

12 4628574517030027264 

13 » b = dec2bin(a, 64) 

14 b = 

15 '0100000000111100000000000000000000000000000000000000000000000000' 

16 » 


f * 'S 

Example02_03b.m: Precision of Floating-Point Numbers 

[5] These statements introduce some concepts about the precision of floating-point numbers. A Command Window 
session is shown in [6], next page. —> 

17 clear 

18 format short 

19 format compact 

20 a = 1234.56789012345678901234 

21 fprintf('%.20f\n', a) 

22 format long 

23 a 

24 single(a) 

V_ J 
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25 » clear 

26 » format short 

27 » format compact 

28 » a = 1234.56789012345678901234 

29 a = 

30 1.2346e+03 

31 » fprintf('%.20f\n', a) 

32 1234.56789012345689116046 

33 » format long 

34 » a 

35 a = 

36 1.234567890123457e+03 

37 » single(a) 

38 ans = 

39 single 

40 1.2345679e+03 

41 » 


Table 2.3b Numeric Output Format 

Function 

Description or Example 

format compact 

Suppress blank lines 

format loose 

Add blank lines 

format short 

3.1416 

format long 

3.141592653589793 

format shortE 

3.1416e+00 

format longE 

3.141592653589793e+00 

format shortG 

short or shortE 

format longG 

long or longE 

format shortEng 

Exponent is a multiple of 3 

format longEng 

Exponent is a multiple of 3 

format + 

Display the sign (+/-) 

format bank 

Currency format; 3.14 

format hex 

40092lfb54442d18 

format rat 

Rational; 355/133 

Details and More: » doc format 
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2.4 Characters and Strings 


Example02_04a.m: Characters 

[2] These statements demonstrates some concepts about 

characters and strings. A Command Window session 
is shown in [3] and the Workspace is shown in [4-5]. 


1 clear 

2 a = 'A' 

3 b = a + 1 

4 char(65) 

5 char('A' + 2) 

6 c = [ ' A' , ' B' , 'C'] 

7 d = ['AB' , 'C'] 

8 e = [ ' A' , 66, 67] 

9 f = 'ABC' 

10 f (1) 

11 f(2 ) 

12 f(3 ) 


y 


Workspace 


© 

Name 

| Value 

| Size 

| Bytes | Class 

»Dcj a 

'A' 

lxl 

2 char 

ans 

C 

lxl 

2 char 

33 b 

66 

lxl 

8 double 

ibcj C 

ABC' 

1x3 

6 char 

- d 

ABC' 

1x3 

6 char 

-£Cj e 

ABC' 

1x3 

6 char 

«cjf 

ABC' 

1x3 

6 char 


13 » clear 

14 » a = 'A' 

15 a = 

16 'A' 

17 » b = a + 1 

18 b = 

19 66 

20 » char(65) 

21 ans = 

22 'A' 

23 » char('A' + 2) 

24 ans = 

25 'C' 

26 » c = ['A', 'B', 'C' 

27 c = 

28 'ABC' 

29 » d = ['AB', 'C'] 

30 d = 

31 'ABC' 

32 » e = ['A', 66, 67] 

33 e = 

34 'ABC' 

35 » f = 'ABC' 

36 f = 

37 'ABC' 

38 » f (1) 

39 ans = 

40 'A' 

41 » f ( 2 ) 

42 ans = 

43 'B' 

44 » f(3) 

45 ans = 

46 'C' 
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Example02_04b.m: ASCII Codes 

[7] MATLAB stores characters according to ASCII Code. ASCII codes 32-126 represent all printable characters on a 
standard keyboard. This example prints a table of characters corresponding to the ASCII Codes 32-126 (see the output 
in [8], next page). —» 

47 clear 

48 fprintf(' 012345678 9\n') 

49 for row = 3:12 

50 fprintf('%2d ', row) 

51 for column = 0:9 

52 code = row*10+column; 

53 if (code < 32) || (code > 126) 

54 fprintf(' ') 

55 else 

56 fprintf('%c ' , code) 

57 end 

58 end 

59 fprintf('\n') 

60 end 




80 Chapter 2 Data Types, Operators, and Expressions 



2.5 Logical Data 81 


2.5 Logical Data 


Example02_05.m: Logical Data Type 

[2] These statements demonstrates some concepts about 
logical data. A Command Window session and the 
Workspace is shown in [3, 4], respectively. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 


clear 


true 
false 
6 > 5 
6 < 5 

(6 > 5)*10 
false*10+true*2 


= (6 > 5) & (6 
= (6 > 5) | (6 

= logical(5) 
m = 5 | 0 
n = (-2) & 'A' 


5 ) 

5 ) 


Name L 

j Value 

Si 2 e 

Bytes Class 


1 

lxl 

1 logical 

✓jb 

0 

lxl 

1 logical 

V\ c 

1 

lxl 

1 logical 

d 

0 

lxl 

1 logical 

=0e 

10 

lxl 

8 double 

tU 

1 

lxl 

8 double 

Vj g 

0 

lxl 

1 logical 

vjh 

1 

lxl 

1 logical 

vjk 

1 

lxl 

1 logical 

Vj m 

1 

lxl 

1 logical 

>/\ n 

1 

lxl 

1 logical 


13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 



» clear 
» a = true 
a = 

logical 

1 

» b = false 
b = 

logical 

0 

» c = 6 > 5 
c = 

logical 

1 

» d = 6 < 5 
d = 

logical 

0 

» e = (6 > 5)*10 
e = 

10 

» f = false*10+true*2 
f = 

2 

»g = (6 > 5) & (6<5) 
g = 

logical 

0 

» h = (6 > 5) | (6 < 5) 

h = 

logical 

1 

» k = logical(5) 
k = 

logical 

1 

» m = 5 | 0 
m = 

logical 

1 

» n = (-2) & 'A' 
n = 

logical 

1 
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2.5 Logical Data 83 


Table 2.5b Rules of Logical or (|) 

OR ( | ) 

true 

false 

true 

true 

true 

false 

true 

false 


Table 2.5a Rules of Logical and (&) 

AND (&) 

true 

false 

true 

true 

false 

false 

false 

false 
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2.6 Arrays 


( \ 

Example02_06a.m 

[2] Type the following commands (also see [3]). 

1 clear 

2 a = 5 

3 b = [5] 

4 c = 5*ones(l,l) 

5 D = ones(2, 3) 

6 e — [If 2 r 3 r 4 f 5] 

7 f = [1 2 3 4 5] 

8 g = [1:5] 

9 h = 1:5 

10 k = 1:1:5 

11 m = linspace(l, 5, 5) 

v_ ) 


12 

» clear 




13 

» a 

= 

5 




14 

a = 






15 


5 





16 

» b 

= 

[5] 




17 

b = 






18 


5 





19 

» c 

= 

5*ones(1,1) 



20 

c = 






21 


5 





22 

» D 

= 

ones(2, 

3) 



23 

D = 






24 


1 

1 

1 



25 


1 

1 

1 



26 

» e 

= 

[If 2, 

U) 

5] 


27 

e = 






28 


1 

2 

3 

4 

5 

29 

» f 

= 

[12 3 

4 5] 



30 

f = 






31 


1 

2 

3 

4 

5 

32 

» g 

= 

[1:5] 




33 

g = 






34 


1 

2 

3 

4 

5 

35 

» h 

= 

1:5 




36 

h = 






37 


1 

2 

3 

4 

5 

38 

» k 

= 

1:1:5 




39 

k = 






40 


1 

2 

3 

4 

5 

41 

» m 

= 

linspace(1, 

5, 5) 


42 

m = 






43 


1 

2 

3 

4 

5 
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Example02_06b.m 

[6] Type the following commands (also see [7]). 


44 clear 

45 a = zeros(1,5) 

46 a(1,5) = 8 

47 a(5) = 9 

48 a([1, 2, 4]) = [8, 7, 6] 

49 a(1:4) = [2, 3, 4, 5] 

50 [rows, cols] = size(a) 

51 len = length(a) 

52 b = a 

53 c = a(1:5) 

54 d = a(3:5) 

55 e = a(3:length(a)) 

56 f = a(3:end) 

57 f(5) = 10 


58 

» clear 




59 

» a = 

zeros(1, 

5) 



60 

a = 





61 

0 

0 

0 

0 

0 

62 

» a (1, 

5) = 8 




63 

a = 





64 

0 

0 

0 

0 

8 

65 

» a ( 5 ) 

= 9 




66 

a = 





67 

0 

0 

0 

0 

9 

68 

» a ( [ 1 

, 2, 4]) 

= [8, 

7, 6] 


69 

a = 





70 

8 

7 

0 

6 

9 

71 

» a (1: 

4) = [2, 

3, 4, 

5] 


72 

a = 





73 

2 

3 

4 

5 

9 

74 

» [rows, cols] 

= size(a) 


75 

rows = 





76 

1 





77 

cols = 





78 

5 





79 

» len 

= length(a) 



80 

len = 





81 

5 





82 

» b = 

a 




83 

b = 





84 

2 

3 

4 

5 

9 

85 

» c = 

a (1: 5 ) 




86 

c = 





87 

2 

3 

4 

5 

9 

88 

» d = 

a ( 3 : 5 ) 




89 

d = 





90 

4 

5 

9 



91 

» e = 

a(3:length(a)) 



92 

e = 





93 

4 

5 

9 



94 

» f = 

a(3:end) 




95 

f = 





96 

4 

5 

9 



97 

» f(5) 

= 10 




98 

f = 





99 

4 

5 

9 

0 

10 


V 
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r \ 

Example02_06c.m 

[11] Type the following commands (also see [12]). 


100 

clear 



101 

a = 

[1, 2 

; 3, 

4; 5, 6] 

102 

b = 

1:6 



103 

c = 

reshape(b. 

3, 2) 

104 

d = 

reshape(b. 

2, 3) 

105 

e = 

d' 



106 

C ( • r 

3) = 

[7, 8 

, 9] 

107 

c(4. 

:) = 

[10, 

11, 12] 

108 

c(4. 

:) = 

[] 


109 

c( : , 

2:3) 

= [] 



110 

» clear 


111 

» a = 

[If 2; 3, 

4; 5, 6] 

112 

a = 



113 

1 

2 


114 

3 

4 


115 

5 

6 


116 

» b = 

1:6 


117 

b = 



118 

1 

2 

3 4 

119 

» c = 

reshape(b 

, 3, 2) 

120 

c = 



121 

1 

4 


122 

2 

5 


123 

3 

6 


124 

» d = 

reshape(b 

, 2, 3) 

125 

d = 



126 

1 

3 

5 

127 

2 

4 

6 

128 

» e = 

d' 


129 

e = 



130 

1 

2 


131 

3 

4 


132 

5 

6 


133 

» c ( : , 

3) = [7/ 

CTi 

00 

134 

c = 



135 

1 

4 

7 

136 

2 

5 

8 

137 

3 

6 

9 

138 

» c(4. 

:) = [10, 

11/ 12] 

139 

c = 



140 

1 

4 

7 

141 

2 

5 

8 

142 

3 

6 

9 

143 

10 

11 

12 

144 

» c(4. 

:) = [] 


145 

c = 



146 

1 

4 

7 

147 

2 

5 

8 

148 

3 

6 

9 

149 

» c ( : , 

2:3) = [] 


150 

c = 



151 

1 



152 

2 



153 

3 




v 
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Example02_06d.m 

[14] Type the following commands (also see [15]). 


154 

clear 

155 

a 

= 

reshape(1:6, 

156 

b 

= 

[7; 8; 9] 

157 

c 

= 

horzcat(a, b) 

158 

d 

= 

[a, b] 

159 

e 

= 

b' 

160 

f 

= 

vertcat(d, e) 

161 

g 

= 

[d; e] 

162 

h 

= 

fliplr(c) 

163 

k 

= 

flipud(c) 


164 

» clear 


165 

» a 

= 

reshape(l:6, 3, 

166 

a = 




167 


1 


4 

168 


2 


5 

169 


3 


6 

170 

» b 

= 

[7; 

CT\ 

00 

171 

b = 




172 


7 



173 


8 



174 


9 



175 

» c 

= 

horzcat(a, b) 

176 

c = 




177 


1 


4 7 

178 


2 


5 8 

179 


3 


6 9 

180 

» d 

= 

[a, 

b] 

181 

d = 




182 


1 


4 7 

183 


2 


5 8 

184 


3 


6 9 

185 

» e 

= 

b' 


186 

e = 




187 


7 


8 9 

188 

» f 

= 

vertcat(d, e) 

189 

f = 




190 


1 


4 7 

191 


2 


5 8 

192 


3 


6 9 

193 


7 


8 9 

194 

» g 

= 

[d; 

e] 

195 

g = 




196 


1 


4 7 

197 


2 


5 8 

198 


3 


6 9 

199 


7 


8 9 

200 

» h 

= 

fliplr(c) 

201 

h = 




202 


7 


4 1 

203 


8 


5 2 

204 


9 


6 3 

205 

» k 

= 

flipud(c) 

206 

k = 




207 


3 


6 9 

208 


2 


5 8 

209 


1 


4 7 


V 
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Table 2.6a Array Creation Functions 

Function 

Description 

zeros(n,m) 

Create an n-by-m matrix of all zeros 

ones(n,m) 

Create an n-by-m matrix of all ones 

eye(n) 

Create an n-by-n identity matrix 

diag(v) 

Create a square diagonal matrix with v on the diagonal 

rand(n,m) 

Create an n-by-m matrix of uniformly distributed random numbers in the interval (0,1) 

randn(n,m) 

Create an n-by-m matrix of random numbers from the standard normal distribution 

linspace(a,b,n) 

Create a row vector of n linearly spaced numbers from a to b 

[X,Y] = meshgrid(x,y) 

Create a 2-D grid coordinates based on the coordinates in vectors x and y. 

Details and More: Help>MATLAB>Language Fundamentals>Matrices and Arrays 


Table 2.6b Array Replication, Concatenation, Flipping, and Reshaping 

Function 

Description 

repmat(a,n,m) 

Replicate array a n times in row-dimension and m times in column-dimension 

horzcat(a,b,...) 

Concatenate arrays horizontally 

vertcat(a,b,...) 

Concatenate arrays vertically 

flipud(A) 

Flip an array upside down 

fliplr(A) 

Flip an array left-side right 

reshape(A,n,m) 

Reshape an array to an n-by-m matrix 

Details and More: Help>MATLAB>Language Fundamentals>Matrices and Arrays 
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2.7 Sums, Products, Minima, and Maxima 


Example02_07 .in 

[2] Type the following commands (also see [3]). 


1 

clear 

2 

a 

= 

1:5 

3 

b 

= 

sum(a) 

4 

c 

= 

cumsumfa) 

5 

d 

= 

prod(a) 

6 

e 

= 

cumprod(a) 

7 

f 

= 

diff(a) 

8 

A 

= 

reshape(1:9 

9 

g 

= 

sum(A) 

10 

B 

= 

cumsum(A) 

11 

h 

= 

prod(A) 

12 

c 

= 

cumprod(A) 

13 

D 

= 

diff(A) 

14 

P 

= 

min(a) 

15 

q 

= 

max(a) 

16 

r 

= 

min(A) 

17 

s 

= 

max(A) 


V 

J 

Table 2.7 

Sums, Products, Minima, and Maxima 

Function 

Description 

sum(A) 

Sum of array elements 

cumsum(A) 

Cumulative sum 

diff(A) 

Differences between adjacent elements 

prod(A) 

Product of array elements 

cumprod(A) 

Cumulative product 

min(A) 

Minimum 

max(A) 

Maximum 


18 

» clear 

19 

20 

» a = 

a = 

1:5 

21 

1 

2 3 

22 

23 

24 

» b = 

b = 

15 

sum(a) 

25 

26 

» c = 

c = 

cumsum(a) 

27 

1 

3 6 

28 

29 

30 

» d = 

d = 

120 

prod(a) 

31 

32 

» e = 

e = 

cumprod(a) 

33 

1 

2 6 

34 

35 

» f = 

f = 

diff(a) 

36 

1 

1 1 

37 

38 

» A = 

A = 

reshape(1:9 

39 

1 

4 7 

40 

2 

5 8 

41 

3 

6 9 

42 

43 

» g = 

g = 

sum(A) 

44 

6 

15 24 

45 

46 

» B = 

B = 

cumsum(A) 

47 

1 

4 7 

48 

3 

9 15 

49 

6 

15 24 

50 

51 

» h = 

h = 

prod(A) 

52 

6 

120 504 

53 

54 

» C = 

c = 

cumprod(A) 

55 

1 

4 7 

56 

2 

20 56 

57 

6 

120 504 

58 

59 

» D = 

D = 

diff(A) 

60 

1 

1 1 

61 

1 

1 1 


5 


15 


120 
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62 

» P 

= 

min(a) 

63 

P = 



64 


1 


65 

» q 

= 

max(a) 

66 

q = 



67 


5 


68 

» r 

= 

min(A) 

69 

r = 



70 


1 

4 

71 

» s 

= 

max(A) 

72 

s = 



73 


3 

6 
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2.8 Arithmetic Operators 


Example02_08a.m 

[2] These statements demonstrate some 
arithmetic operations on matrices (see the 
Command Window session in [3-4], next 
page). -> 

1 clear 


2 

A 

= 

reshape(1:6, 

3 

B 

= 

reshape(7:12 

4 

C 

= 

A+B 

5 

D 

= 

A-B 

6 

E 

= 

B' 

7 

F 

= 

A*E 

8 

a 

= 

[3, 6] 

9 

b 

= 

a/F 

10 

c 

= 

b*F 

11 

G 

= 

F"2 

12 

H 

= 

A. *B 

13 

K 

= 

A. /B 

14 

M 

= 

A."2 

15 

P 

= 

A+l 0 

16 

Q 

= 

A-10 

17 

R 

= 

A* 1.5 

18 

S 

= 

A/2 


V_y 


Table 2.8 Arithmetic Operators 

Operator 

Name 

Description 

Precedence level 

+ 

plus 

Addition 

6 

- 

minus 

Subtraction 

6 

* 

mtimes 

Multiplication 

5 

/ 

mrdivide 

Division 

5 

/V 

mpower 

Exponentiation 

2 

. * 

times 

Element-wise multiplication 

5 

./ 

rdivide 

Element-wise division 

5 


power 

Element-wise exponentiation 

2 

- 

uminus 

Unary minus 

4 

+ 

uplus 

Unary plus 

4 

Details and More: 

Help>MATLAB>Language Fundamentals>Operators and Elementary Operations>Operator Precedence 
Help>MATLAB>Language Fundamental Operators and Elementary Operations>Arithmetic 



















19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 
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» 
» 
A = 


clear 

A = reshape(l:6, 2, 3) 


1 

3 

5 




2 

4 

6 




» B = 

reshape(7 

:12, 2, 3) 




B = 






7 

9 

11 




8 

10 

12 




» C = 

A+B 

70 

» P = A+10 



c = 


71 

P = 



8 

12 

16 72 

11 13 

15 


10 

14 

18 73 

12 14 

16 


» D = 

A-B 

74 

» Q = A-10 



D = 


75 

Q = 



-6 

-6 

" 6 76 

-9 -7 

-5 


-6 

-6 

-6 77 

-8 -6 

-4 


» E = 

B' 

78 

» R = A*1.5 



E = 


79 

R = 



7 

8 

80 

1.5000 

4.5000 

7.5000 

9 

10 

81 

3.0000 

6.0000 

9.0000 

11 

12 

82 

» S = A/2 



» F = 

A*E 

83 

S = 



F = 


84 

0.5000 

1.5000 

2.5000 

89 

98 

85 

1.0000 

2.0000 

3.0000 

116 

128 





» a = 

[ 3 f 6 ] 






» 

b = 

» 

c : 

» 

G = 


» 
H = 


» 
K = 


» 
M : 


3 6 

b = a/F 

-13.0000 10.0000 

c = b*F 

3 6 

G = F*2 

19289 21266 

25172 27752 

H = A.*B 

7 27 

16 40 

K = A./B 

0.1429 
0.2500 
M = A .*2 


55 

72 


0.3333 

0.4000 


0.4545 

0.5000 


9 

16 


25 

36 
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Example02_08b.m 

[8] These statements demonstrate some arithmetic 
operations on vectors (also see [9]). Remember 
that a vector is a special case of matrices. Thus 
operations on vectors are special cases of those on 
matrices. 


86 

clear 

87 

a 

= 

1:4 

88 

b 

= 

5:8 

89 

c 

= 

a+b 

90 

d 

= 

a-b 

91 

e 

= 

a* (b' ) 

92 

f 

= 

(a')*b 

93 

g 

= 

a/b 

94 

h 

= 

a. *b 

95 

k 

= 

a. /b 

96 

m 

= 

a."2 


v_ J 


» clear 
» a = 1:4 


a = 


1 

2 

3 

4 

» b = 

00 

LD 



b = 




5 

6 

7 

8 

» c = 

a+b 



c = 




6 

8 

10 

12 

» d = 

d = 

a-b 



-4 

-4 

-4 

-4 

» e = 

a*(b ' ) 



e = 




70 




» f = 

(a*)*b 



f = 




5 

6 

7 

8 

10 

12 

14 

16 

15 

18 

21 

24 

20 

24 

28 

32 


» g = a/b 

g = 

0.4023 
» h = a.*b 
h = 

5 12 21 32 

» k = a./b 
k = 

0.2000 0.3333 0.4286 0.5000 

» m = a. A 2 
m = 

1 4 9 16 


97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 
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Example02_08c.m 

[11] These statements demonstrate some arithmetic 
operations on scalars (also see [12]). Remember that a 
scalar is a special case of matrices. Thus operations on 
scalar are special cases of those on matrices. 


131 

clear 

132 

a 

= 

6 

133 

b 

= 

4 

134 

c 

= 

a+b 

135 

d 

= 

a-b 

136 

e 

= 

a*b 

137 

f 

= 

a/b 

138 

g 

= 

a A 2 

139 

h 

= 

a. *b 

140 

k 

= 

a. /b 

141 

m 

= 

a."2 


v_ J 


142 

» 

clear 

143 

» 

a = 

6 

144 

a : 



145 


6 


146 

» 

b = 

4 

147 

b = 



148 


4 


149 

» 

c = 

a+b 

150 

c : 



151 


10 


152 

» 

d = 

a-b 

153 

d = 



154 


2 


155 

» 

e = 

a*b 

156 

e : 



157 


24 


158 

» 

f = 

a/b 

159 

f = 



160 


l.: 

5000 

161 

» 

g = 

a A 2 

162 

g : 



163 


36 


164 

» 

h = 

a. *b 

165 

h = 



166 


24 


167 

» 

k = 

a. /b 

168 

k : 



169 


1 .. 

5000 

170 

» 

m = 

a. A 2 

171 

m : 



172 


36 
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2.9 Relational and Logical Operators 


Table 2.9a Relational Operators 

Operator 

Description 

Precedence level 

== 

Equal to 

8 

~= 

No equal to 

8 

> 

Greater than 

8 

< 

Less than 

8 

>= 

Greater than or equal to 

8 

<= 

Less than or equal to 

8 

isequal 

Determine array equality 


Details and More: Help>MATLAB>Language Fundamentals> 
Operators and Elementary Operations>Relational Operations 

Table 2.9b Logical Operators 

Operator 

Description 

Precedence level 

& 

Logical AND 

9 

I 

Logical OR 

10 

- 

Logical NOT 

4 

&& 

Logical AND (short-circuit) 

11 

11 

Logical OR (short-circuit) 

12 

Details andMore: Help>MATLAB>Language Fundamentals> 
Operators and Elementary Operations>Logical Operations 


Example02_09 .m 

[2] These statements demonstrate some relational and logical operations (also see [3,4], next page). —> 

1 clear 

2 A = [5,0,-1; 3,10,2; 0,-4,8] 

3 Map = (A > 6) 

4 location = find(Map) 

5 list = A(location) 

6 list2 = A(find(A>6)) 

7 list3 = A(find(A>0 & A<=8 & A~=3)) 

8 find(A)' 

9 —A 

10 —A 

11 isequal(A, —A) 

V_ ) 
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12 

clear 


13 

A = [5,0,- 

1; 3,10,2; 

14 

A = 


15 

5 

0 -1 

16 

3 

10 2 

17 

0 

-4 8 

18 

Map = (A > 

6) 

19 

Map = 


20 

3x3 locrical array 

21 

0 0 

0 

22 

0 1 

0 

23 

0 0 

1 

24 

location = 

find(Map) 

25 

location = 


26 

5 


27 

9 


28 

list = A(location) 

29 

list = 


30 

10 


31 

8 


32 

list2 = A(find(A>6)) 

33 

list2 = 


34 

10 


35 

8 


36 

list3 = A(find(A>0 & 

37 

list3 = 


38 

5 


39 

2 


40 

8 


41 

find(A)' 


42 

ans = 


43 

1 2 

5 6 

44 

~A 


45 

ans = 


46 

3x3 locrical array 

47 

0 1 

0 

48 

0 0 

0 

49 

1 0 

0 

50 

—A 


51 

ans = 


52 

3x3 locrical array 

53 

1 0 

1 

54 

1 1 

1 

55 

0 1 

1 

56 

isequal(A, 

A ) 

57 

ans = 


58 

locrical 


59 

0 



Workspace 




Name L. 

| Value 

Size 

Bytes 

Class 

Sa 

PA-lAl... 

3x3 

72 

double 

V\ ans 

0 

lxl 

1 

logical 

list 

[lOffl 

2x1 

16 

double 

~H Hst2 

DOffl 

2x1 

16 

double 

n list3 


3x1 

24 

double 

1 1 location 

pa 

2x1 

16 

double 

Map 

3x3 logical 

3x3 

9 

logical 
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2.10 String Manipulations 


Example02_10a.m: String Manipulations 

[2] Type and run the following statements, which demonstrate some string manipulations, 
shown in [3]. 

1 clear 

2 a = 'Hello,'; 

3 b = 'world!'; 

4 c = [a, ' ', b]; 

5 disp(c) 

6 name = input('What is your name? ', 's'); 

7 years = input('What is your age? '); 

8 disp(['Hello, ', name, '! You are ', num2str(years), ' 

9 str = sprintf('Pi = %.8f', pi); 

10 disp(str) 

11 Names1 = [ 

12 'David ' 

13 'John 

14 'Stephen']; 

15 Names2 = char('David', 'John', 'Stephen'); 

16 if isequal(Names1, Names2) 

17 disp('The two lists are equal.') 

18 end 

19 name = deblank(Names1(2,:)); 

20 disp(['The name ', name, ' has ', num2str(length(name)) 


21 » Example02_10a 

22 Hello, world! 

23 What is your name? Lee 

24 What is your age? 60 

25 Hello, Lee! You are 60 years old. 

26 Pi = 3.14159265 

27 The two lists are equal. 

28 The name John has 4 characters. 

29 » 


\ 

Input your name and age as 


years old.']) 


' characters.']) 

_ ) 
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Example02_10b.m: A Simple Calculator 

[6] This program uses function eval to create a simple calculator. Type and run the program (see a test run in [7]). 

30 clear 

31 disp('A Simple Calculator') 

32 while true 

33 expr = input('Enter an expression (or quit): ', 's'); 

34 if strcmp(expr,'quit') 

35 break 

36 end 

37 disp([expr, ' = ', num2str(eval(expr))]) 

38 end 

\ _ J 


39 » Example02_10b 

40 A Simple Calculator 

41 Enter an expression (or quit): 3+5 

42 3+5 = 8 

43 Enter an expression (or quit): sin(pi/4) + (2 + 2.1^2)*3 

44 sin(pi/4) + (2 + 2.1 A 2)*3 = 19.9371 

45 Enter an expression (or quit): quit 

46 » 
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Table 2.10 String Manipulations 

Function 

Description 

A = char(a,b,...) 

Convert the strings to a matrix of rows of the strings, padding blanks 

disp(X) 

Display value of variable 

x = input(prompt,'s') 

Request user input 

s = sprintf(format,a,b,...) 

Write formatted data to a string 

s = num2str(x) 

Convert number to string 

x = str2num(s) 

Convert string to number 

x = str2double(s) 

Convert string to double precision value 

x = eval(exp) 

Evaluate a MATLAB expression 

s = deblank(str) 

Remove trailing blanks from a string 

s = strtrim(str) 

Remove leading and trailing blanks from a string 

tf = strcmp(si,s2) 

Compare two strings (case sensitive) 

tf = strcmpi(si,s2) 

Compare two strings (case insensitive) 

Details and More: 

Help>MATLAB>Language Fundamentals>Data Types>Characters and Strings; Data Type Conversion 
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2.11 Expressions 



Example02_l la.m: Law of Sines 

[3] This script calculates the three angles a , /?, 7 of a triangle and its areav4, given three sides a = 5, b = 6 , and c = 1. 


clear 
a = 5; 
b = 6; 
c = 7; 

R = a*b*c/sqrt((a+b+c)*(a-b+c)*(b-c+a)*(c-a+b)) 

alpha = asind(a/(2*R)) 

beta = asind(b/(2*R)) 

gamma = asind(c/(2*R)) 

sumAngle = alpha + beta + gamma 

A1 = a*b*c/(4*R) 

A2 = b*c*sind(alpha)/2 
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12 » Example02_1 la 

13 R = 

14 3.5722 

15 alpha = 

16 44.4153 

17 beta = 

18 57.1217 

19 gamma = 

20 78.4630 

21 sumAngle = 

22 180 

23 A1 = 

24 14.6969 

25 A2 = 

26 14.6969 

27 » 


Example02_llb.m: Law of Cosines 

[6] The law of cosines states that (see Wikipedia>Trigonometry; use the same notations in [2], last page): 

2 1 2 2 7 _1 Z? T C Cl 

a -b +c -2bccosa or a = cos - 

2 be 

With a = 5, b = 6, c = 7, the angle a, (3, and y can be calculated as follows: 

28 clear 

29 a = 5; b = 6; c = 7 ; 

30 alpha = acosd( (b /v 2+c /v 2-a /v 2 ) / ( 2*b*c) ) 

31 beta = acosd((c A 2+a A 2-b A 2)/(2*c*a)) 

32 gamma = acosd( (a /v 2+b^2-c A 2 ) / ( 2*a*b) ) 

V_ J 


33 » Example02_llb 

34 alpha = 

35 44.4153 

36 beta = 

37 57.1217 

38 gamma = 

39 78.4630 

40 


» 
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Table 2.11b 

Elementary Math Functions 

Function 

Description 

sin(x) 

Sine (in radians) 

sind(x) 

Sine (in degrees) 

asin(x) 

Inverse sine (in radians) 

asind(x) 

Inverse sine (in degrees) 

cos(x) 

Cosine (in radians) 

cosd(x) 

Cosine (in degrees) 

acos(x) 

Inverse cosine (in radians) 

acosd(x) 

Inverse cosine (in degrees) 

tan(x) 

Tangent (in radians) 

tand(x) 

Tangent (in degrees) 

atan(x) 

Inverse tangent (in radians) 

atand(x) 

Inverse tangent (in degrees) 

atan2(y,x) 

Four-quadrant inverse tangent (radians) 

atan2d(y,x) 

Four-quadrant inverse tangent (degrees) 

abs(x) 

Absolute value 

sqrt(x) 

Square root 

exp(x) 

Exponential (base e) 

log(x) 

Logarithm (base e ) 

loglO(x) 

Logarithm (base 10) 

factorial(n) 

Factorial 

sign(x) 

Sign of a number 

rem(a,b) 

Remainder after division 

mod(a,m) 

Modulo operation 

Details and More: 

Help>MATLAB>Mathematics>Elementary Math 


Table 2.11a 

Special Characters 

Special characters 

Description 

[ i 

Brackets 

{> 

Braces 

o 

Parentheses 

i 

Matrix transpose 

- 

Field access 

. . . 

Continuation 

r 

Comma 

r 

Semicolon 

: 

Colon 

e 

Function handle 

Details and More: 

Help>MATLAB>Language Fundamental Operators 

and Elementary Operations>MATLAB Operators and 

Special Characters 
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2.12 Example: Function Approximation 


r. 


Example02_12a.m: Scalar Expressions 


[2] This script calculates the value of sin(/r/4)using the Taylor series in Eq. (a). The screen output is shown in [3]. 

1 clear 

2 x = pi/4; 

3 terml = x; 

4 term2 = -x' v 3/(3*2) ; 

5 term3 = x A 5/(5*4*3*2); 

6 term4 = -x A 7/(7*6*5*4*3*2); 

7 format long 

8 sinx =terml+term2+term3+term4 

9 exact = sin(x) 

10 error = (sinx-exact)/exact 

v_ J 


11 

12 


sinx 


0.707106469575178 


13 exact 


14 


0.707106781186547 


15 error 


16 


-4.406850247592559e-07 
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f \ 

Example02_12b.m: Use of For-Loop 

[6] Type and run this program. The screen output is the same as that of Example02_12a.m ([3], last page). 

17 clear 

18 x = pi/4; n = 4; sinx = 0; 

19 for k = l:n 

20 sinx = sinx + ((-1) A (k-1))*(x A (2*k-l))/factorial(2*k-l); 

21 end 

22 format long 

23 sinx 

24 exact = sin(x) 

25 error = (sinx-exact)/exact 

v_ J 


sinx = 

0.707106781179619 
exact = 

0.707106781186547 
error = 

-9.797690960678494e-12 


Example02_12c.m: Vector Expressions 

[9] This script produces the same output as that of Example02_12b.m ([3], last page) using a vector expression (line 29) 
in place of the f or-loop used in Example02_12b.m (lines 19-21). 

26 clear 

27 x = pi/4; n = 4; k = lsn; 

28 format long 

29 sinx = sum(((-1). A (k-1)).*(x. A (2*k-l))./factorial(2*k-l)) 

30 exact = sin(x) 

31 error = (sinx-exact)/exact 

V_ J 
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About Example02_12c.m 

[10] In line 27, the variable k is created as a row vector of four elements; k = [ 1 , 2 ,3,4 ]. The f or-loop (lines 
19-21) is now replaced by a vector expression (line 29), which uses the function sum and element-wise operators 
(. A , . and . /). To help you understand the statement in line 29, we break it into several steps: 


stepl = k-1 
step2 = (-l).^stepl 
step3 = 2*k-l 
step4 = x. A step3 
step5 = step2.*step4 
step6 = factorial(step3) 
step7 = step5./step6 
step8 = sum(step7) 
sinx = step8 


Using k = [ 1,2,3,4 ], following the descriptions of element-wise operations (2.8[6-7], pages 95-96) and the 
function sum for vectors (2.7[5], page 90), we may further decode these steps as follows: 


stepl = [ 0,1,2,3 ] 

Step2 = (-1). A [0,l,2,3] = [1,-1,1,-1] 

step3 = [1,3,5,7] 

step4 = x. A [l,3,5,7] = [x,x A 3,x A 5,x A 7] 

step5 = [1,-1,1,-1].*[x,x A 3,x A 5,x A 7] = [x,-x A 3,x A 5,-x A 7] 

step6 = factorial([1,3,5,7 ] ) = [ 1,6,120,5040] 

step7 = [x,-x A 3,x A 5,-x A 7]./[l,6,120,5040] = [x,-x A 3/6,x A 5/120,-x A 7/5040] 

step8 = x-x A 3/6+x A 5/120-x A 7/5040 
sinx = x-x A 3/6+x A 5/120-x A 7/5040 


Substituting x with pi/4, we have sinx = 0.707106469575178. 


Example02_12d.m: Matrix Expressions 

[11] This script calculates sin(x) for various x values and produces a graph as shown in [12], next page. A matrix 
expression (line 37) is used in this script. —» 

32 clear 

33 x = linspace(0,pi/2,20); 

34 n = 4; 

35 k = 1:n; 

36 [X, K] = meshgrid(x, k); 

37 sinx = sum(((-1). A (K-1)).*(X . A (2*K-1))./factorial(2*K-1)); 

38 plot(x*180/pi, sinx, 'o', x*180/pi, sin(x)) 

39 title('Approximation of sin(x)') 

40 xlabel('x (deg)') 

41 ylabel('sin(x) (dimensionless)') 

42 legend('Approximation', 'Exact', 'Location', 'southeast') 

V_ ) 





sin(x) (dimensionless) 
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Approximation of sin(x) 
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r 

Example02_12e.m: Multiple Curves 

[14] This script plots four approximated curves and an exact curve of sin(x) as shown in [15], the four approximated 
curves corresponding to the Taylor series of 1, 2, 3, and 4 items, respectively. 


43 

clear 


44 

x = linspace(0,pi/2,20); 


45 

n = 4; 


46 

k = (lsn); 


47 

[X, K] = meshgrid(x, k); 


48 

sinx = cumsum(((-1). A (K- 

1)).*(X . A (2* 

49 

plot(x*180/pi, sinx(1,:) 

' +_ ' 

, T , . . . 

50 

x*180/pi, sinx(2,:) 

' X- ' 

, ^ , • • • 

51 

x*180/pi, sinx(3,:) 

' * ' 

, , • • • 

52 

x*180/pi, sinx(4,:) 

, o , • • • 

53 

x*180/pi, sin(x)) 


54 

title('Approximation of 

sin(x)') 

55 

xlabel('x (deg)') 


56 

ylabel('sin(x) (dimensionless)') 

57 

legend('l term', '2 terms', '3 terms'. 


(2 *K-1))./factorial(2*K-1)); 


58 


'Location', 'southeast') 




y 
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2.13 Example: Series Solution of a Laplace Equation 


Example02_13.m: Series Solution of a Laplace Equation 

[2] This script calculates the solution (p(x,y ) according to Eq. (a) and plots a three-dimensional surface (p = (p(x,y) [3]. 

1 clear 

2 k = 1:20; 

3 x = linspace(0,1,30); 

4 y = linspace(0,1,40); 

5 [X,Y,K] = meshgrid(x, y, k); 

6 Phi = sum(4*(l-cos(K*pi))./(K*pi)."3.*exp(-K.*X*pi).*sin(K.*Y*pi), 3); 

7 surf(x, y. Phi) 

8 xlabel('\itx') 

9 ylabel('\ity') 

10 zlabel('\phi(\itx\rm f \ity\rm)') 

V_ J 
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2.14 Example: Deflection of Beams 



A 

[2] This is the simply 
supported beam 
considered in this section. 


Example02_14.m: Deflection of Beams 

[3] This script produces a graphic output as shown in [4] (next page) and a text output as shown in [5] (next page). —» 

1 clear 

2 w = 0.1; 

3 h = 0.1; 

4 L = 8; 

5 E = 210e9; 

6 F = 3000; 

7 a = L/4; 

8 I = w*h"3/12; 

9 R = F/L*(L-a); 

10 theta = F*a/(6*E*I*L)*(2*L-a)*(L-a); 

11 x = 1inspace(0,L,100); 

12 y = -theta*x+R*x. A 3/(6*E*I)-F/(6*E*I)*((x>a).*((x-a)."3)); 

13 plot(x,y*1000) 

14 title('Deflection of a Simply Supported Beam') 

15 xlabel('x (m)'); ylabel('Deflection (mm)') 

16 y = -y; 

17 [ymax, index] = max(y); 

18 fprintf('Maximum deflection %.2f mm at x = %.2f m\n', ymax*1000, x(index)) 

v_ ) 
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^iPJxj 


File Edit View Insert Took Desktop Window Help 


p j 0 a ± | I 


o 


Deflection of a Simply Supported Beam 



» Example02_14 

Maximum deflection 12.78 mm at x = 3.56 m 



L 


URES (mm) 

12.783 
11.717 
10.652 
9.5869 
8.5217 
7.4565 
6.3913 
5.3261 
4.2609 
3.1956 
2.1304 
1.0652 
le-030 


I 
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2.15 Example: Vibrations of Supported Machines 



m 
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Undamped Free Vibrations 


Example02_15a.m: Undamped Free Vibrations 

[4] This program calculates and plots the solution x(7) in 
Eqs. (b, c), last page. The graphic output is shown in [5]. 

1 clear 

2 m = 1; k = 100; delta = 0.2; 

3 omega = sqrt(k/m); 

4 T = 2*pi/omega; 

5 t = linspace(0, 3*T, 100); 

6 x = delta*cos(omega*t); 

7 axes('XTick', T:T:3*T, 'XTickLabel' 

8 axis([0, 3*T, -0.2, 0.2]) 

9 grid on 

10 hold on 

11 comet(t, x) 

12 title('Undamped Free Vibrations') 

13 xlabel(['Time (T = num2str(T), ' 

14 ylabel('Displacement (m)') 



sec)']) 


N 


{'T','2T','3T'}); 


V 
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Example02_15b.m: Damped Free Vibrations 

[7] This program calculates and plots the solution x(t) in 
Eqs. (f, g), last page. The graphic output is shown in [8]. 


Damped Free Vibrations 



|*\ 


T 21 

Time (T = 0.62911 sec) 


15 clear 

16 m = 1; k = 100; c = 1; delta = 0.2; 

17 omega = sqrt(k/m); 

18 cC = 2*m*omega; 

19 omegaD = omega*sqrt(1-(c/cC) A 2); 

20 T = 2*pi/omegaD; 

21 t = linspace(0, 3*T, 100); 

22 x = delta*exp(-c*t/(2*m)).*(cos(omegaD*t)+c/(2*m*omegaD)*sin(omegaD*t)); 

23 axes('XTick', T:T:3*T, 'XTickLabel', {'T','2T','3T'}); 

24 axis([0, 3*T, -0.2, 0.2]) 

25 grid on 

26 hold on 

27 comet(t, x) 

28 title('Damped Free Vibrations') 

29 xlabel(['Time (T = ', num2str(T), ' sec)']) 

30 ylabel('Displacement (m)') 
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Example02_15c.m: Forced Vibrations 

[10] This program plots the steady-state response x(7) in Eqs. (i, j, k), last page. The graphic output is shown in [11]. 

31 clear 

32 % System parameters 

33 m = 1; k = 100; c = 1; 

34 f = 2; omegaF = 2*pi; 

35 

36 % System response 

37 omega = sqrt(k/m); 

38 cC = 2*m*omega; 

39 rC = c/cC; 

40 rW = omegaF/omega; 

41 xm = (f/k)/sqrt((l-rW A 2) A 2+(2*rC*rW) A 2); 

42 phi = atan((2*rC*rW)/(l-rW A 2)); 

43 T = 2*pi/omegaF; 

44 t = linspace(0, 3*T, 100); 

45 x = xm*sin(omegaF*t-phi); 

46 

47 % Graphic output 

48 axes('XTick', T:T:3*T, 'XTickLabel', {'T','2T','3T'}); 

49 axis([0, 3*T, -0.2, 0.2]) 

50 grid on 

51 hold on 

52 comet(t, x) 

53 title('Harmonically Forced Vibrations') 

54 xlabel(['Time (T = ', num2str(T), ' sec)']) 

55 ylabel('Displacement (m)') 

56 text(T,-0.1, ['Amplitude = ', num2str(xm*1000), ' mm']) 

57 text(T,-0.12,['Phase angle = ', num2str(phi*180/pi), ' degrees']) 

v_ J 
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2.16 Additional Exercise Problems 
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A program may consist of one 
or more program files; one of 
them is the main program file. 
Each program file may consist 
of a main program and 
functions. The first function, if 
exists, in a program file is 
called the main function; others 
are called subfunctions, nested 
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functions. Subfunctions are 
local to the program file to 
which they belong, while 
nested functions and 
anonymous functions are local 
to the function to which they 
belong. Execution of a 
program starts from the main 
program (or main function) of 
the main program file. 
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3.1 If-Blocks 


Example03_01.m: If-Blocks 

1 clear 

2 nl = input('Enter a number: '); 

3 n2 = input('Enter another number: '); 

4 disp('Test #1') 

5 string = 'At least one is non-positive'; 

6 if nl>0 && n2>0 

7 string = 'Both are positive'; 

8 end 

9 disp(string) 


10 



11 

disp('Test #2') 


12 

if nl>0 && n2>0 


13 

disp('Both are 

positive.') 

14 

else 


15 

disp('At least 

one is non-positive. 

16 

end 


17 



18 

disp('Test #3') 


19 

if nl>0 && n2>0 


20 

disp('Both are 

positive.') 

21 

elseif nl==0 || n2 

== 0 

22 

disp('At least 

one is zero.') 

23 

else 


24 

disp('At least 

one is negative.') 

25 

end 


26 



27 

disp('Test #4') 


28 

if nl>0 && n2>0 


29 

disp('Both are 

positive.') 

30 

elseif nl==0 || n2 

== 0 

31 

disp('At least 

one is zero.') 

32 

elseif nl*n2 < 0 


33 

disp('They have opposite signs.') 

34 

else 


35 

disp('Both are 

negative') 

36 

end 


37 



38 

disp('Test #5') 


39 

a = [nl, n2]; 


40 

if all(a>0) 


41 

disp('Both are 

positive') 

42 

elseif any(a>0) 


43 

disp('One of them is positive.') 

44 

else 


45 

disp('None of them is positive.') 

46 

end 
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» Example03_01 
Enter a number: 5 
Enter another number: -2 
Test #1 

At least one is non-positive 
Test #2 

At least one is non-positive. 
Test #3 

At least one is negative. 

Test #4 

They have opposite signs. 

Test #5 

One of them is positive. 

» 
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3.2 Switch-Blocks 


r > 

Example03_02a.m: Pizza Menu 

[2] Type and run this program. See [3] for an input/output. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 
19 


clear 

fprintf(['Cheese\n' ... 

'MushroomXn' ... 

'SausageXn' ... 

'PineappleXn']) 

choice = input('Choose a pizza: ', 's'); 

choice = lower(strtrim(choice)); 
switch choice 

case 'cheese' 

disp('Cheese pizza $3.99') 
case 'mushroom' 

disp('Mushroom pizza $3.66') 
case 'sausage' 

disp('Sausage pizza $4.22') 
case 'pineapple' 

disp('Pineapple pizza $2.99') 
otherwise 

disp('Sorry?') 

end 




j 


Cheese 

Mushroom 

Sausage 

Pineapple 

Choose a pizza: pineapple 
Pineapple pizza $2.99 
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Example03_02b.m: Pizza Menu 

[5] Type and run this program. See [6, 7] for an input/output. 

20 clear 

21 choice = menu('Choose a pizza', ... 

22 'Cheese', 'Mushroom', 'Sausage', 'Pineapple'); 

23 switch choice 

24 case 1 

25 disp('Cheese pizza $3.99') 

26 case 2 

27 disp('Mushroom pizza $3.66') 

28 case 3 

29 disp('Sausage pizza $4.22') 

30 case 4 

31 disp('Pineapple pizza $2.99') 

32 end 

V_ ) 


E 


MENU 


jcjxj 


Choose a pizza 


Cheese 


Mushroom 


Sausage 


Pineapple pizza $2.99 


Pineapple 
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3.3 While-Loops 


Example03_03a.m: Pizza Menu 

[2] Type and run this program. See [3, 4] for an input/output. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 
17 
10 


clear 

choice = 0; 
while choice ~= 5 

choice = menu('Choose a pizza', ... 

'Cheese', 'Mushroom', 'Sausage', 'Pineapple', 'Quit'); 
switch choice 
case 1 

disp('Cheese pizza $3.99') 

case 2 mrrn 

disp('Mushroom pizza $3.66') 
case 3 

disp('Sausage pizza $4.22') 
case 4 „ 

Mushroonr 

disp( 1 Pineapple pizza $2.99') 
case 5 Sausage 

disp('Bye!') 


JnjxJ 


Choose a pizza 


end 


Pineapple 


end 


Quit 


Sausage pizza $4.22 
Mushroom pizza $3.66 
Cheese pizza $3.99 
Pineapple pizza $2.99 
Bye! 
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f 

Example03_03b.m: Pizza Menu 

[5] Program Example03_03a.m can be slightly modified using a "forever-true statement" (line 20) and a break- 
statement (line 34). I personally prefer this style to that in Example03_03a.m. 


19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 


clear 
while 1 

choice = menu('Choose a pizza', ... 

'Cheese', 'Mushroom', 'Sausage', 'Pineapple', 'Quit'); 

switch choice 
case 1 

disp('Cheese pizza $3.99') 
case 2 

disp('Mushroom pizza $3.66') 
case 3 

disp('Sausage pizza $4.22') 
case 4 

disp('Pineapple pizza $2.99') 
case 5 

disp('Bye I') 

break; 

end 

end 
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3.4 For-Loops 


Example03_04a.m: For-Loops 

[2] The program Example02_13.m (page 113) is rewritten using a f or-loop as follows. Type and test-run the program. 
The output is the same as before (2.13[3], page 113); this program uses less memory space (you may compare [3], next 
page, with 2.13 [4], page 113) but takes more computing time. —» 

1 clear 

2 x = linspace(0,1,30 ) ; 

3 y = linspace(0,1,40 ) ; 

4 [X,Y] = meshgrid(x, y); 

5 Phi = zeros(40,30 ) ; 

6 for k = 1:20 

7 Phi = Phi+4*(l-cos(k*pi))/(k*pi)~3*exp(-k*X*pi).*sin(k*Y*pi); 

8 end 

9 surf(x, y. Phi) 

10 xlabel('\itx') 

11 ylabel('\ity') 

12 zlabel('\phi(\itx\rm,\ity\rm)') 

v_ J 
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Workspace 



® 

Name <L 

Value 

Size 

Bytes 

Class 

±jk 

20 

lxl 

8 

double 

ijPhi 

40x30 double 

40x30 

9600 

double 

ij* 

1x30 double 

1x30 

240 

double 

^x 

40x30 double 

40x30 

9600 

double 

_ijy 

1x40 double 

1x40 

320 

double 


40x30 double 

40x30 

9600 

double 


f \ 

Example03_04b.m: Nested For-Loops 

[5] The statements inside a f or-loop ([1], last page) may include other f or-loops, called nested loops. Type and 
run the following program. There are 3 layers of f or-loops. The expression in lines 21-22 is now a scalar expression. 
The output is the same as before (2.13[3], page 113); the Workspace is the same as [3] except that additional two 
variables (i and j) are added to the Workspace. —» 


13 clear 

14 x = linspace(0,1,30); 

15 y = linspace(0,1,40); 

16 [X,Y] = meshgrid(x, y); 

17 Phi = zeros(40,30); 

18 for i = 1:40 

19 for j = 1:30 

20 for k = 1:20 

21 Phi(i,j) = Phi(i, j )+4* (l-cos(k*pi) )/(k*pip3 ... 

22 *exp(-k*X(i,j)*pi)*sin(k*Y(i,j)*pi); 

23 end 

24 end 

25 end 

26 surf(x, y. Phi) 

27 xlabel('\itx') 

28 ylabel('\ity') 

29 zlabel('\phi(\itx\rm,\ity\rm)') 


V 
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Measuring Time: Functions tic and toe 

[6] To measure the time needed to execute a portion of a program, we may insert the function tic (which starts a 
stopwatch) before the portion and insert the function toe (which stops the stopwatch) after the portion. MATLAB will 
report on the Command Window the elapsed time (in seconds) to execute the portion of program. For example, insert 
the functions tic and toe in the program Example03_04b.m as follows: 

tic 

for i = 1:40 

for j = 1:30 

for k = 1:20 

Phi(i,j) = Phi(i,j)+4*(1-cos(k*pi))/(k*pi)*3 ... 

*exp(-k*X(i,j)*pi)*sin(k*Y(i,j)*pi); 

end 

end 

end 

toe 

To compare with program Example02_13.m, we also insert functions tic and toe as follows 
tic 

Phi = sum(4*(1-cos(K*pi))./(K*pi).~3.*exp(-K.*X*pi).*sin(K.*Y*pi), 3); 
toe 

It leaves you to confirm that, as mentioned in [4], last page, using built-in array operation capabilities 
(Example02_13.m, page 113) is usually computationally efficient than using f or-loops (Example03_04b.m, last page). 
Further, programs using built-in array operation capabilities can be easily adapted to a parallel computing environment. 

# 
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3.5 User-Defined Functions 

( ; 

Example03_05a.m: User-Defined Functions 

[1] Type the following program, which calculates the period and the response of a damped free vibration system based 
on the formula in Eqs. (f, g), page 118; click Save button (1.5[6], page 22) and accept the default file name 
Example03_05a, which is the same as the function name (line 1). You must accept the default name; the file name must 
match the main function name in a program file. MATLAB saves the file as Example03_05a.m. Note that a file starting 
with a function cannot be saved as a Live Script. 

You cannot run this function by clicking the Run button (1.5[8], page 22). You must "call" the function and provide 
its input arguments from the Command Window (as demonstrated in [2]), from a script, or from a Live Script. 

1 function [T, x] = Example03_05a(m, k, c, delta, t) 

2 % Under-damped free vibrations of a mass-spring-damper system 

3 % Input Arguments: 

4 % m = Mass, a scalar, SI unit: kg 

5 % k = Spring constant, a scalar, SI unit: N/m 

6 % c = Damping constant, a scalar, SI unit: N/(m/s) 

7 % delta = Initial displacement, a scalar, SI unit: m 

8 % t = Time, a row vector, SI unit: s 

9 % Output Arguments: 

10 % T = Period, a scalar, SI unit: s 

11 % x = Displacement, a row vector of the same length of t, SI unit: m 

12 % On Error, it prints a message and returns: 

13 % T = 0, a scalar 

14 % x = 0, a scalar 

15 omega = sqrt(k/m); 

16 cC = 2*m*omega; 

17 if c>= cC 

18 disp('Not an under-damped system!') 

19 T = 0; x = 0; 

20 return; 

21 end 

22 omegaD = omega*sqrt(1-(c/cC)~2); 

23 T = 2*pi/omegaD; 

24 x = delta*exp(-c*t/(2*m)).*(cos(omegaD*t)+c/(2*m*omegaD)*sin(omegaD*t)); 

25 end 

v_. 

C 

Example03_05b.m: Calling Functions 

[2] On the Command Window, type the following commands. —» 

26 » doc Example03_05a 

27 » time = linspace(0,5,100); 

28 » [period, response] = Example03_05a(1, 100, 1, 0.2, time); 

29 » plot(time, response) 

30 » Example03_05a(1, 100, 1, 0.2, time) 

31 ans = 

32 0.6291 
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Example03_05c.m: Damped Free Vibrations 

[9] Type, save, and run the following program, which is based on Example02_15b.m (page 119), demonstrating the 
calling of the function Example03_05a (lines 36 and 38). The output is the same as that in 2.15[8], page 119. 

33 clear 

34 mass = 1; spring = 100; damper = 1; delta = 0.2; 

35 time = 0; 

36 T = Example03_05a(mass, spring, damper, delta, time); 

37 time = linspace(0, 3*T, 100); 

38 [T, response] = Example03_05a(mass, spring, damper, delta, time); 

39 axes('XTick', T:T:3*T, 'XTickLabel', {'T','2T','3T'}); 

40 axis([0, 3*T, -0.2, 0.2]) 

41 grid on 

42 hold on 

43 comet(time, response) 

44 title('Damped Free Vibrations') 

45 xlabel(['Time (T = ', num2str(T), ' sec)']) 

46 ylabel('Displacement (m)') 
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3.6 Subfunctions 


Example03_06a.m: Damped Free Vibrations 

[2] In the following program, lines 1-14 are copied from Example03_05c.m (last page), and the function names in lines 
4 and 6 are changed to UDFV (under-damped free vibrations) as shown. Lines 16-27 are copied from 
Example03_05a.m (page 134), and the function name in line 16 is changed to UDFV as shown. The output is the same 
as that in 2.15[8], page 119. 

1 clear 

2 mass = 1; spring = 100; damper = 1; delta = 0.2; 

3 time = 0; 

4 T = UDFV(mass, spring, damper, delta, time); 

5 time = linspace(0, 3*T, 100); 

6 [T, response] = UDFV(mass, spring, damper, delta, time); 

7 axes('XTick', T:T:3*T, 'XTickLabel', {'T','2T','3T'}); 

8 axis([0, 3*T, -0.2, 0.2]) 

9 grid on 

10 hold on 

11 comet(time, response) 

12 title('Damped Free Vibrations') 

13 xlabel(['Time (T = ', num2str(T), ' sec)']) 

14 ylabel('Displacement (m)') 

15 

16 function [T, x] = UDFV(m, k, c, delta, t) 

17 omega = sqrt(k/m); 

18 cC = 2*m*omega; 

19 if c>= cC 

20 disp('Not an under-damped systemI') 

21 T = 0; x = 0; 

22 return; 

23 end 

24 omegaD = omega*sqrt(1-(c/cC)*2); 

25 T = 2*pi/omegaD; 

26 x = delta*exp(-c*t/(2*m)).*(cos(omegaD*t)+c/(2*m*omegaD)*sin(omegaD*t)); 

2 7 end 

Lines 1-14 are main program, while the function UDFV (lines 16-27) is a subfunction. Since the main program 
doesn't have any input arguments, it can be called by clicking the Run button (1.5[8], page 22). —» 
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Example03_06b.m: MATLAB 2016a or Earlier Versions 

[4] This program can be executed with MATLAB 2016a or earlier versions, but it cannot be opened as a Live Script. # 

28 function Example03_06b 

29 mass = 1; spring = 100; damper = 1; delta = 0.2; 

30 time = 0; 

31 T = UDFV(mass, spring, damper, delta, time); 

32 time = linspace(0, 3*T, 100); 

33 [T, response] = UDFV(mass, spring, damper, delta, time); 

34 axes('XTick', T:T:3*T, 'XTickLabel', {'T','2T','3T'}); 

35 axis([0, 3*T, -0.2, 0.2]) 

36 grid on 

37 hold on 

38 comet(time, response) 

39 title('Damped Free Vibrations') 

40 xlabel(['Time (T = ', num2str(T), ' sec)']) 

41 ylabel('Displacement (m)') 

42 end 

43 

44 function [T, x] = UDFV(m, k, c, delta, t) 

45 omega = sqrt(k/m); 

46 cC = 2*m*omega; 

47 if c>= cC 

48 disp('Not an under-damped system!') 

49 T = 0; x = 0; 

50 return; 

51 end 

52 omegaD = omega*sqrt(1-(c/cC) A 2); 

53 T = 2*pi/omegaD; 

54 x = delta*exp(-c*t/(2*m)).*(cos(omegaD*t)+c/(2*m*omegaD)*sin(omegaD*t)); 

55 end 

v_/ 
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3.7 Nested Functions 

Example03_07.m: Ball-Throwing 

[1] Create a new file, copy all the lines in Example01_18.m (page 55), and make the following changes: insert 
lines 3 and 39 so that the main program becomes a function; indent all the lines of the function 
pushbuttonCallback (lines 29-38) as shown to emphasize that it is a nested function (this step is not 
really necessary); delete the global-statement (lines 2 and 29 in Example01_18.m) from both functions; add 
line 1 as a single-statement main program. Save as Example03_07.m, and run the program. The resulting GUI 
should be the same as that in 1.18[3-6], page 56. —» 

1 Trajectory 

2 

3 function Trajectory 

4 g = 9.81; 

5 figure('Position', [30,70,500,400]) 

6 axes('Units', 'pixels', ... 

7 'Position', [50,80,250,250]) 

8 axis([0, 10, 0, 10]) 

9 xlabel('Distance (m)'), ylabel('Height (m)') 

10 title('Trajectory of a Ball') 

11 

12 uicontrol('Style', 'text', ... 

13 'String', 'Initial velocity (m/s)', ... 

14 'Position', [330,300,150,20]) 

15 velocityBox = uicontrol('Style', 'edit', ... 

16 'String', '5', ... 

17 'Position', [363,280,80,20]); 

18 uicontrol('Style', 'text', ... 

19 'String', 'Elevation angle (deg)', ... 

20 'Position', [330,240,150,20]) 

21 angleBox = uicontrol('Style', 'edit', ... 

22 'String', ' 45', ... 

23 'Position', [363,220,80,20]); 

24 uicontrol('Style', 'pushbutton', ... 

25 'String', 'Throw', ... 

26 'Position', [363,150,80,30], ... 

27 'Callback', @pushbuttonCallback) 

28 

29 function pushbuttonCallback(pushButton, ~) 

30 vO = str2double(velocityBox.String); 

31 theta = str2double(angleBox.String)*pi/180; 

32 tl = 2*v0*sin(theta)/g; 

33 t = 0:0.01:tl; 

34 x = v0*cos(theta)*t; 

35 y = v0*sin(theta)*t-g*t. A 2/2; 

36 hold on 

37 comet(x, y) 

38 end 

39 end 
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3.8 Function Handles 


Example03_08a.m: Finding Zeros 

[2] Create and run the following program, which finds zeros of the function f(x) = e~ Ax cos 3 nx, i.e., solving the 
equation e~ Ax cos 3nx = 0. 

1 clear 

2 handle = @oscilation; 

3 xl = fzero(handle, 0.2) 

4 x2 = fzero(handle, 0.5) 

5 x3 = fzero(handle, 0.8) 

6 

7 function fx = oscillation(x) 

8 fx = exp(-4*x)*cos(3*pi*x); 

9 end 


xl = 

0.1667 

x2 = 

0.5000 

x3 = 


0.8333 
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File Edit View Insert Tools Desktop Window Help 


”J £3 J k 


€> ® ® A ' I Q ns 


a 



Workspace 




Name 

| Value 

| Size 

I Bytes | Class 


©j handle 

©oscillation 

lxl 

32 function_handle 

_ 

_U xl 

0.1667 

lxl 

8 double 


id x 2 

0.5000 

lxl 

8 double 


id 

0.8333 

lxl 

8 double 



Table 3.8 Function Handles 

Function 

Description 

handle = @function 

Retrieve function handle 

handle (...) 

Evaluate function value 

Details and More: Help>MATLAB> Language Fundamental Data Types> Function Handles 
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Example03_08b.m: Finding Zeros 

[8] The following program implements a simplified version of the function f zero. 
Create a new file, copy all the lines in Example03_08a.m (page 141), make changes 
in lines 12 and 13 as shown, add a function f zero (lines 20-33), and run the 
program. The output is shown in [9]. 

10 clear 

11 handle = @oscillation; 

12 xl = fzero(handle, 0.1) 

13 x2 = fzero(handle, 0.4) 

14 x3 = fzero(handle, 0.8) 

15 

16 function fx = oscillation(x) 

17 fx = exp(-4*x)*cos(3*pi*x); 

18 end 

19 

20 function x = fzero(handle, xO) 

21 tolerance = 1.0e-6; 

22 step = 0.01; 

23 x = xO; 

24 si = sign(handle(x)); 

25 while step/x > tolerance 

26 if si == sign(handle(x+step)) 

27 x = x+step; 

28 else 

29 step = step/2; 

30 end 

31 end 

32 disp('Simplified version') 

33 end 


Simplified 
xl = 

0.1667 
Simplified 
x2 = 

0.5000 
Simplified 
x3 = 

0.8333 


version 


version 


version 
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3.9 Anonymous Functions 


Example03_09a.m: Anonymous Functions 

[1] This script demonstrates the use of anonymous functions. It solves the nonlinear 
equation e~ 4x cos 3kx = 0 near 0.2, 0.5, and 0.8. It also evaluates the function values 
f(x) = e~ 4x cos 3kx at 0.2, 0.5, and 0.8. The output is shown in [2]. 


1 clear 

2 fun = @(x) exp( 

3 xl = fzero(fun, 

4 x2 = fzero(fun, 

5 x3 = fzero(fun, 

6 fxl = fun(0.2) 

7 fx2 = fun(0.5) 

8 fx3 = fun(0.8) 


4*x)*cos(3*pi*x); 
0 . 2 ) 

0.5) 

0 . 8 ) 


Note that, in this program, we use the built-in function f zero, not the user-defined 
function f zero in lines 20-33 of Example03_08b.m, last page. 


xl = 

0.1667 

x2 = 

0.5000 

x3 = 

0.8333 
fxl = 

-0.1389 
fx2 = 

-2.4861e-17 
f x3 = 

0.0126 


Visibility of Variables 

[4] An anonymous function can use previously defined variables. For example, 
Example03_09a.m could be rewritten as follows. 

clear, a = 4; b = 3; 

fun = @(x) exp(-a*x)*cos(b*pi*x); 

xl = fzero(fun, 0.2) 

x2 = fzero(fun, 0.5) 

x3 = fzero(fun, 0.8) 

fxl = fun(0.2) 

fx2 = fun(0.5) 

fx3 = fun(0.8) 
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Example03_09b.m: Symmetrical Two-Spring System 

[6] Create a new file, type following lines, and run the program. 

9 clear 

10 k = 6.8; L = 12; F = 9.2; 

11 equation = @(x) 2*k*(sqrt(L A 2+x A 2)-L)*x/sqrt(L A 2+x A 2)-F; 

12 fzero(equation, 0) 

Note that, in this program, we use the built-in function f zero, not the user-defined function f zero in lines 20-33 of 
Example03_08b.m, page 143. 

V_ ) 


x = 


6.1485 
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3.10 Function Precedence Order 


Example03_l O.m 

[2] On the Command Window, execute the 
following commands. The output is shown in [3]. 

1 clear 

2 a = sin(l) 

3 sin = 3:5; 

4 b = sin(1) 

5 clear 

6 c = sin(l) 


7 

» 

clear 

8 

» 

a = sin(1) 

9 

a : 


10 


0.8415 

11 

» 

sin = 3:5; 

12 

» 

b = sin(1) 

13 

b = 


14 


3 

15 

» 

clear 

16 

» 

c = sin(l) 

17 

c : 


18 


0.8415 


Table 3.10 Function Precedence Order 

Description 

Precedence level 

Variables 

i 

Nested functions 

3 

Subfunction (local functions) 

4 

Functions in current folder 

9 

Functions in the search path 

10 


Details and More: 

Help>MATLAB>Programming Scripts and Functions>Functions>Function Basics>Function Precedence Order 
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3.11 Program Files 


Example03_l 1 .m: Damped Free Vibrations 

[2] This program is a modified version of Example03_05c.m. This program file (Example03_ll.m) and the program file 
Example03_05a.m constitute a program. Run the program, using the following input data (see [3], next page): 
m = 1 kg, k = 100 N/m, c = 1 N/(m/s), and delta = 0.2 m. The graphic output is shown in 2.15[8], page 119. —» 

1 clear 

2 [mass, spring, damper, delta] = askProperties 

3 time = 0; 

4 T = Example03_05a(mass, spring, damper, delta, time); 

5 time = linspace(0, 3*T, 100); 

6 [T, response] = Example03_05a(mass, spring, damper, delta, time); 

7 plotDisplacement(T, time, response) 

8 

9 function [m, k, c, delta] = askProperties 

10 m = input('Enter the mass (kg): '); 

11 k = input('Enter the spring constant (N/m): '); 

12 c = input('Enter the damper constant (N/(m/s)): '); 

13 delta = input('Enter the initial displacement (m): '); 

14 end 

15 

16 function plotDisplacement(T, time, response) 

17 axes('XTick', T:T:3*T, 'XTickLabel', {'T','2T','3T'}); 

18 axis([0, 3*T, -0.2, 0.2]) 

19 grid on 

20 hold on 

21 comet(time, response) 

22 title('Damped Free Vibrations') 

23 xlabel(['Time (T = ', num2str(T), ' sec)']) 

24 ylabel('Displacement (m)') 

25 end 
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» Example03_ll 

Enter the mass (kg): 1 

Enter the spring constant (N/m): 100 

Enter the damper constant (N/(m/s)): 1 

Enter the initial displacement (m): 0.2 

mass = 

1 

spring = 

100 

damper = 

1 

delta = 

0.2000 

» 
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3.12 Example: Deflection of Beams 


C \ 

Example03_12.m: Deflection of Beams 

[1] The following program calculates the deflection at the center of a simply supported beam subject to a uniform load q 
(SI unit: N/m) as shown in [2] ( Figure source: https://commons.wikimedia.org/wiki/ 

File:Simple_beam_with uniform distributed load.svg, by Hermanoere). It uses the formulas in 2.14[ 1 ] (page 115). 

The uniform load q can be thought of as n evenly spaced concentrated forces F = qL/n, with a spacing of L/n . Ifn is 
large enough (e.g., n = 1000), we’ll obtain a solution close to the theoretical solution. We assume q = 500 N/m and the 
same properties for the beam as those in 2.14, w = 0.1 m, h = 0.1 m, L = 8 m, E = 210 GPa. 

1 w = 0.1; h = 0.1; L = 8; E = 210e9; q = 500; 

2 n = 1000; F = q*L/n; 

3 delta = 0; 

4 for k = l:n 

5 a = (L/n)*k; 

6 delta = delta + deflection(w, h, L, E, F, a, L/2); 

7 end 

8 fprintf('Deflection at center is %.4f mm\n', delta*1000) 

9 

10 function delta = deflection(w, h, L, E, E, a, x) 

11 I = w*h A 3/12; 

12 R = F/L*(L-a); 

13 theta = F*a/(6*E*I*L)*(2*L-a)*(L-a); 

14 delta = theta*x-R*x."3/(6*E*I)+F/(6*E*I)*((x>a).*((x-a). A 3)); 

15 end 

V_ J 


y 


Deflection at center is 15.2381 iran 
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Verification of the Result 

[5] The result [3], last page, can be verified using a well-know formula (see Wikipedia>Deflection (engineering)): 

s 5 qg_ 

~ 384£7 

which can be easily calculated with the following commands: 

» w = 0.1; h = 0.1; L = 8; 

» E = 210e9; q = 500; 

» I = w*h"3/12; 

» delta = 5*q*L /v 4/(384*E*I)*1000 
delta = 

15.2381 

Arbitrary Loads 

This section demonstrates the calculation of deflection for a particular case of loads. The same idea can be used to 
calculate the deflection of a simply supported beam subject to any concentrated and/or distributed loads. # 
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3.13 Example: Sorting and Searching 


Example03_13.m: Sorting and Searching 

[2] This program performs sorting and searching of numbers. Before looking into the statements, test-run the program 
as shown in [4], next page. (Continued at [3], next page.) —» 


a = [] 

r 

disp(' 

1 . 

disp(' 

2. 

disp(' 

3. 

disp(' 

4. 

disp(' 

5. 

disp(' 

6 . 

while 

1 


9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

4 0 end 


Save') 


task = input('Enter a task number: '); 
switch task 
case 1 

while 1 

string = input('Enter a number (or stop): 
if strcmpi(string, 'stop') 
break; 

else 

n = n+1; 

a(n) = str2num(string); 

end 

end 

a = sort(a); 
case 2 

disp(a) 
case 3 

key = input('Enter a key number: '); 
found = search(a, key); 
if found 

disp(['Index = ', num2str(found)]) 

else 

disp('Not found 1') 

end 
case 4 

save('Datafile03_13', 'a') 

case 5 

load('Datafile03_13') 
n = length(a); 
case 6 

break 
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[3] Example03_13.m (Continued) 


42 

function out = sort(a) 

43 

n = 

length(a); 

44 

for 

i = n-1:-1:1 

45 


for j = 1:i 

46 


if a(j) > a(j+1) 

47 


tmp = a(j); 

48 


a (j) = a(j+1); 

49 


a(j+l) = tmp; 

50 


end 

51 


end 

52 

end 


53 

out 

= a; 

54 

end 


55 



56 

function found = search(a, key) 

57 

n = 

length(a); 

58 

low 

= i; 

59 

high = n; 

60 

found = 0; 

61 

while low <= high && -found 

62 


mid = floor((low+high)/2); 

63 


if key == a(mid) 

64 


found = mid; 

65 


elseif key < a(mid) 

66 


high = mid-1; 

67 


else 

68 


low = mid+1; 

69 


end 

70 

end 


71 

end 



"\ 


72 

» Example03_13 


73 

1. Input numbers and sort 

74 

2. Display the list 


75 

3. Search 


76 

4. Save 



77 

5. Load 



78 

6. Quit 



79 

Enter a 

task number 

: 1 

80 

Enter a 

number (or 

stop): 

81 

Enter a 

number (or 

stop): 

82 

Enter a 

number (or 

stop): 

83 

Enter a 

number (or 

stop): 

84 

Enter a 

number (or 

stop): 

85 

Enter a 

number (or 

stop): 

86 

Enter a 

number (or 

stop): 

87 

Enter a 

task number 

: 2 

88 

1 

3 5 

6 

89 

Enter a 

task number 

: 3 

90 

Enter a 

key number: 

6 

91 

Index = 

4 


92 

Enter a 

task number 

: 4 

93 

Enter a 

task number 

: 6 

94 

» Example03_13 


95 

1. Input numbers and sort 

96 

2. Display the list 


97 

3. Search 


98 

4. Save 



99 

5. Load 



100 

6. Quit 



101 

Enter a 

task number 

: 5 

102 

Enter a 

task number 

: 2 

103 

1 

3 5 

6 

104 

Enter a 

task number 

: 6 

105 

» 




9 


7 


9 
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3.14 Example: Statically Determinate Trusses (Version 1.0) 


1000 N 
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[2] The system of equations in Eq. (b) can be easily solved with the following MATLAB commands: 

» a = sqrt(2)/2; 


» A = [-a a 0 0 

0 0; 

-a -a 0 0 

0 0; 

a 0 1 1 

0 0; 

a 0 0 0 

1 0; 

0 -a -1 0 

0 0; 

0 a 0 0 

0 l]; 

» b = [0, 1000, 0, C 

0, 0] 1 ; 

» x = A\b 


x = 

-707.1068 


-707.1068 


500.0000 

n 


u 

500.0000 


500.0000 


We have F,=F 2 = -707.1068 N, F 3 

= 500 N, Ri=0, and R 2 = R, = 500 N. 

The last command (x = A\b) solves a system of linear equations A*x = b. Note that b is a column vector. The 

matrices A and b have the same number of rows. We’ll give you more details about this left divide operator (or 

backslash operator) in Sections 9.7 and 10.3. 


Example03_14.m: Truss 1.0 

[4] This program solves the 3-bar truss problem in [1], last page. (Continued at [5], next page.) —» 
1 clear, Nodes = [ 


2 

i, i. 

o, 

o. 

o. 

-1000, 

o, 

0; 

3 

o 

o 

1, 

If 

o. 

0, 

o, 

500; 

4 

2, 0, 

0, 

1# 

0, 

0, 

0, 

500]; 

5 

Members = 

[1 

, 2 

? 1/ 

3? 2, 

3] 

} 


6 [Nodes, Members] = solveTruss(Nodes, Members) 

7 
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[5] Example03_14.m (Continued). The output is shown in [6-7], next page. —» 


8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 


function [outNodes, outMembers] = solveTruss(Nodes, Members) 
n = size(Nodes,1); m = size(Members,1); 
if (m+3) < 2*n 

disp('Unstable!') 

outNodes = 0; outMembers = 0; return 
elseif (m+3) > 2*n 

disp('Statically indeterminate I') 
outNodes = 0; outMembers = 0; return 


end 
A = 
for 


zeros(2*n, 2*n); loads = zeros(2*n,1); nsupport = 0; 
i = 1: n 
for j = l:m 

if Members(j,1) == i || Members(j,2) == i 
if Members(j,l) == i 

nl = i; n2 = Members(j,2); 
elseif Members(j,2) == i 

nl = i; n2 = Members(j,1); 

end 

xl = Nodes(nl,l); yl = Nodes(nl,2); 
x2 = Nodes(n2,l); y2 = Nodes(n2,2); 

L = sqrt((x2-xl) A 2+(y2-yl)^2); 

A( 2*i-l,j) = (x2-xl)/L; 

A(2*i, j) = (y2-yl)/L; 

end 

end 

if (Nodes(i,3) == 1) 

nsupport = nsupport+1; 

A(2*i-l,m+nsupport) = 1; 

end 

if (Nodes(i,4) == 1) 

nsupport = nsupport+1; 

A(2*i, m+nsupport) = 1; 

end 

loads(2*i-l) = -Nodes(i,5); 
loads(2*i) = -Nodes(i,6); 

end 

forces = A\loads; 

Members(:,3) = forces(Ism); 
nsupport = 0; 
for i = lsn 

if (Nodes(i,3) 
nsupport = 

Nodes(i,7) 

end 

if (Nodes(i,4) 
nsupport = 

Nodes(i,8) 

end 

end 

outNodes = Nodes; outMembers = Members; 
disp('Solved successfully.') 
end 


== 1 ) 

nsupport+1; 

= forces(m+nsupport); 

== 1 ) 

nsupport+1; 

= forces(m+nsupport); 
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» Example03_14 
Solved successfully. 
Nodes = 

1 1 

0 0 

2 0 

Members = 

1.0000 2.0000 

1.0000 3.0000 

2.0000 3.0000 


0 

1 

0 


0 

1 

1 


-707.1068 

-707.1068 

500.0000 


» 


0 -1000 

0 0 

0 0 


0 0 

0 500 

0 500 


Table 3.14a Nodal Data for 3-Bar Truss 

node 

X 

y 

supportx 

supporty 

loadx 

loady 

reactionx 

reactiony 

1 

1 

1 

0 

0 

0 

-1000 

0 

0 

2 

0 

0 

i 

i 

0 

0 

0 

500 

3 

2 

0 

0 

1 

0 

0 

0 

500 


Table 3.14b Member Data for 3-Bar Truss 

member 

nodel 

node2 

force 

1 

1 

2 

-707.11 

2 

1 

3 

-707.11 

3 

2 

3 

500 
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3.15 Example: Statically Determinate Trusses (Version 2.0) 


Example03_15.m: Truss 2.0 

[1] This is an improved version of Example03_14.ru. It implements a text-based user-interface, allowing the user to 

define 

a statically determinate truss. We'll use this program to solve two tmss problems: the 3-bar tmss problem (page 

154) is solved in [6] (page 164), and a 21-bar truss problem ([7], page 165) is solved in [8-11] (pages 165-167). 

1 

clear 


2 

Nodes 

= []; Members = []; 

3 

disp( 

1. Input nodal coordinates') 

4 

disp( 

2. Input connecting nodes of members') 

5 

disp( 

3. Input three supports') 

6 

disp( 

4. Input loads') 

7 

disp( 

5. Print truss') 

8 

disp( 

6. Solve truss') 

9 

disp( 

7. Print results') 

10 

disp( 

8. Save data') 

11 

disp( 

9. Load data') 

12 

disp( 

10. Quit') 

13 

while 

1 

14 

task = input('Enter the task number: '); 

15 

switch task 

16 


case 1 

17 


Nodes = inputNodes(Nodes); 

18 


case 2 

19 


Members = inputMembers(Members); 

20 


case 3 

21 


Nodes = inputSupports(Nodes); 

22 


case 4 

23 


Nodes = inputLoads(Nodes); 

24 


case 5 

25 


printTruss(Nodes, Members) 

26 


case 6 

27 


[Nodes, Members] = solveTruss(Nodes, Members); 

28 


case 7 

29 


printResults(Nodes, Members) 

30 


case 8 

31 


saveAll(Nodes, Members) 

32 


case 9 

33 


[Nodes, Members] = loadAll; 

34 


case 10 

35 


break 

36 

end 

37 

38 

end 


(Continued at [2 

V 

] on the next page.) 

J 
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r. 


[2] Example03_15.m (Continued) 


39 

function output = inputNodes(Nodes) 


40 

while 1 


41 

data = input('Enter [node, x, y] or 0 

to stop: '); 

42 

if data(l) == 0 


43 

break 


44 

else 


45 

Nodes(data(1),1:2) = data(2:3); 


46 

end 


47 

end 


48 

output = Nodes; 


49 

end 


50 



51 

function output = inputMembers(Members) 


52 

m = 0; 


53 

while 1 


54 

data = input('Enter [nodel, node2] or 

0 to stop: '); 

55 

if data(l) == 0 


56 

break 


57 

else 


58 

m = m+1; 


69 

Members(m,1:2) = data; 


60 

end 


61 

end 


62 

output = Members; 


63 

end 


64 



65 

function output = inputSupports(Nodes) 


66 

Nodes(2,3:4) = 0; 


67 

for k = 1:3 


68 

data = input('Enter [node, dir] (dir: 

''x'' or ''y''): 

69 

if data(2) == 'x' 


70 

Nodes(data(1),3) = 1; 


71 

elseif data(2) == 'y' 


72 

Nodes(data(1),4) = 1; 


73 

end 


74 

end 


75 

output = Nodes; 


76 

end 


77 



78 

function output = inputLoads(Nodes) 


79 

Nodes(:,5:6) = 0; 


80 

while 1 


81 

data = input('Enter [node, load-x, load-y] or 0 to stop 

82 

if data(l) == 0 


83 

break 


84 

else 


85 

Nodes(data(1),5:6) = data(2:3); 


86 

end 


87 

end 


88 

output = Nodes; 


89 

end 


90 




(Continued at [3], next page.) —» 
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[3] Example03_15.m (Continued) 

91 function printTruss(Nodes, Members) 

92 if (size(Nodes,2)<6 || size(Members,2)<2) 

93 disp('Truss data not complete'); return 

94 end 

95 fprintf('\nNodal Data\n') 

96 fprintf('Node x y Support-x Support-y Load-x Load-y\n') 

97 for k = 1:size(Nodes,1) 

98 fprintf('%4.Of%9.2f%9.2f%11.Of%11.Of%9.Of%9.Of\n', k, Nodes(k, 1:6)) 

99 end 

100 fprintf('\nMember Data\n') 

101 fprintf('Member Nodel Node2\n') 

102 for k = 1:size(Members,1) 

103 fprintf('%4.Of%9.Of%9.Of\n', k, Members(k, 1:2)) 

104 end 

105 end 

106 

107 function printResults(Nodes, Members) 

108 if (size(Nodes,2)<8 || size(Members,2)<3) 

109 disp('Results not available I'), return 

110 end 

111 fprintf('XnReaction ForcesXn') 

112 fprintf('Node Reaction-x Reaction-y\n') 

113 for k = 1:size(Nodes,1) 

114 fprintf('%4.0f%12.2f%12.2f\n', k, Nodes(k, 7:8)) 

115 end 

116 fprintf('\nMember ForcesXn') 

117 fprintf('Member ForceXn') 

118 for k = 1:size(Members,1) 

119 fprintf('%4.Of%12.2f\n', k, Members(k, 3)) 

12 0 end 

121 end 

122 

123 function saveAll(Nodes, Members) 

124 fileName = input('Enter file name (default Datafile): ', 's'); 

125 if isempty(fileName) 

126 fileName = 'Datafile'; 

127 end 

128 save(fileName, 'Nodes', 'Members') 

129 end 

130 

131 function [Nodes, Members] = loadAll 

132 fileName = input('Enter file name (default Datafile): ', 's'); 

133 if isempty(fileName) 

134 fileName = 'Datafile'; 

135 end 

136 load(fileName) 

137 end 

138 

(Continued at [4], next page.) —» 
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[4] Example03_l5.m (Continued) —» 


139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 
161 
162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 
189 


function [outNodes, outMembers] = solveTruss(Nodes, Members) 
n = size(Nodes,1); m = size(Members,1); 
if (m+3) < 2*n 

disp('Unstable!') 

outNodes = 0; outMembers = 0; return 
elseif (m+3) > 2*n 

disp('Statically indeterminate!') 
outNodes = 0; outMembers = 0; return 

end 

A = zeros(2*n, 2*n); loads = zeros(2*n,1); nsupport = 0; 
for i = l:n 

for j = Ism 

if Members(j,l) == i | j Members(j,2) == i 
if Members(j,l) == i 

nl = i; n2 = Members(j,2); 
elseif Members(j,2) == i 

nl = i; n2 = Members(j,1); 

end 

xl = Nodes(nl,l); yl = Nodes(nl,2); 
x2 = Nodes(n2,l); y2 = Nodes(n2,2); 

L = sqrt((x2-xl) A 2+(y2-yl) A 2); 

A(2*i-l,j) = (x2-xl)/L; 

A(2*i, j) = (y2-yl)/L; 

end 

end 

if (Nodes(i,3) == 1) 

nsupport = nsupport+1; 

A(2*i-l,m+nsupport) = 1; 

end 

if (Nodes(i,4) == 1) 

nsupport = nsupport+1; 

A(2*i, m+nsupport) = 1; 

end 

loads(2*i-l) = -Nodes(i,5); 
loads(2*i) = -Nodes(i,6); 

end 

forces = A\loads; 

Members(:,3) = forces(Ism); 
nsupport = 0; 
for i = lsn 

if (Nodes(i,3) == 1) 

nsupport = nsupport+1; 

Nodes(i,7) = forces(m+nsupport); 

end 

if (Nodes(i,4) == 1) 

nsupport = nsupport+1; 

Nodes(i,8) = forces(m+nsupport); 

end 

end 

outNodes = Nodes; outMembers = Members; 
disp('Solved successfully.') 


190 end 
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» Example03_15 

1. Input nodal coordinates 

2. Input connecting nodes of members 

3. Input three supports 

4. Input loads 

5. Print truss 

6. Solve truss 

7. Print results 

8. Save data 

9. Load data 

10. Quit 

Enter the task number: 1 


Enter 

[node, 

x, y] or 0 

to 

stop: 

[1 1 

1] 

Enter 

[node, 

x, y] or 0 

to 

stop: 

[2 0 

0] 

Enter 

[node, 

x, y] or 0 

to 

stop: 

[3 2 

0] 

Enter 

Enter 

[node, x, y] or 0 
the task number: 2 

to 

► 

stop: 

0 


Enter 

[ nodel, 

node2] or 

0 

to stop 

: [1 

2] 

Enter 

[nodel, 

node2] or 

0 

to stop 

: [1 

3] 

Enter 

[nodel, 

node2] or 

0 

to stop 

: [2 

3] 

Enter 

[nodel, 

node2] or 

0 

to stop 

: 0 



Enter 

Enter 


Enter the task number: 3 


Enter 

[node, 

dir] 

(dir: 

' x' 

or 

' y ' ) ! 

: [2 

’*'] 

Enter 

[node, 

dir] 

(dir: 

' x' 

or 

'y ' ) ! 

: [2 

'y' 1 

Enter 

[node, 

dir] 

(dir: 

' X ' 

or 

■y ' ): 

: [3 

'y' ] 


Enter the task number: 4 


node, load-x, load-y] or 
node, load-x, load-y] or 


to 

to 


stop: 

stop: 


[1 

0 


0 - 1000 ] 


Enter 

the task 

number: 

5 




Nodal 

Data 






Node 

X 

y 

Support-x 

Support-y 

Load-x 

Load-y 

1 

1.00 

1.00 

0 

0 

0 

-1000 

2 

0.00 

0.00 

1 

1 

0 

0 

3 

2.00 

0.00 

0 

1 

0 

0 

Member 

■ Data 






Member 

Nodel 

Node2 





1 

1 

2 





2 

1 

3 





3 

2 

3 





Enter 

the task 

number: 

6 





Solved successfully. 
Enter the task number: 


Reaction Forces 
Node Reaction-x 
1 0.00 

2 0.00 

3 0.00 


Reaction-y 

0.00 

500.00 

500.00 


Member Forces 
Member Force 

1 -707.11 

2 -707.11 

3 500.00 

Enter the task number: 8 

Enter file name (default Datafile): Datafile03_15a 
Enter the task number: 10 
» 
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lkN 



» Example03_15 

1. Input nodal coordinates 

2. Input connecting nodes of members 

3. Input three supports 

4. Input loads 

5. Print truss 

6. Solve truss 

7. Print results 

8. Save data 

9. Load data 


10. Quit 







Enter 

the task number 

■: ] 

L 




Enter 

[node, 

x, y] or 

0 

to 

i stop: 

[1 0 0] 

Enter 

[node, 

x, y] or 

0 

to 

> stop: 

[2 5 0] 

Enter 

[node, 

x, y] or 

0 

to 

> stop: 

[3 10 0] 

Enter 

[node, 

x, y] or 

0 

to 

i stop: 

[4 15 0] 

Enter 

[node, 

x, y] or 

0 

to 

• stop: 

[5 20 0] 

Enter 

[node, 

x, y] or 

0 

to 

i stop: 

[6 25 0] 

Enter 

[node, 

x, y] or 

0 

to 

• stop: 

[7 30 0] 

Enter 

[node, 

x, y] or 

0 

to 

• stop: 

[8 5 8/3] 

Enter 

[node, 

x, y] or 

0 

to 

i stop: 

[9 10 8*2/3] 

Enter 

[node, 

x, y] or 

0 

to 

• stop: 

[10 15 8] 

Enter 

[node, 

x, y] or 

0 

to 

i stop: 

[11 20 8*2/3] 

Enter 

[ node, 

x, y] or 

0 

to 

i stop: 

[12 25 8/3] 

Enter 

[node, 

x, y] or 

0 

to 

• stop: i 

0 

Enter 

the task number 


l 




Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [1 2] 

Enter 

[ nodel , 

r node2] 

or 

0 

to 

stop 

: [2 3] 

Enter 

[ nodel , 

r node2] 

or 

0 

to 

stop 

: [3 4] 

Enter 

[nodel , 

r node2] 

or 

0 

to 

stop 

: [4 5] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [5 6] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [6 7] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [7 12] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [12 11] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [11 10] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [10 9] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [9 8] 

Enter 

[ nodel t 

r node2] 

or 

0 

to 

stop 

: [8 1] 

Enter 

[nodel , 

r node2] 

or 

0 

to 

stop 

: [12 6] 

Enter 

[nodel t 

r node2 ] 

or 

0 

to 

stop 

: [12 5] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [11 5] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [11 4] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [9 4] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [9 3] 

Enter 

[ nodel , 

r node2 ] 

or 

0 

to 

stop 

: [8 3] 

Enter 

[nodel , 

r node2] 

or 

0 

to 

stop 

: [8 2] 

Enter 

[nodel , 

r node2] 

or 

0 

to 

stop 

: [10 4] 

Enter 

[ nodel , 

r node2] 

or 

0 

to 

stop 

: 0 
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Enter 

the task number: 3 








Enter 

[ node 

r 

dir] (dir: 'x' 

or 

' y' 

): 

[1 ’X'] 



Enter 

[ node 

r 

dir] (dir: 'x' 

or 

' y' 

): 

[i 'y'l 



Enter 

[ node 

r 

dir] (dir: 'x' 

or 

' y' 

): 

[7 'y'] 



Enter 

the task number: 4 








Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[2 

0 -5000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[3 

0 -5000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[4 

0 -5000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[8 

0 -1000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[9 

0 -1000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[10 

0 -1000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[11 

0 -1000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

[12 

0 -1000] 


Enter 

[ node 

r 

load-x. 

load-y] 

or 

0 

to 

stop 

0 



Enter 

the task number: 5 








Nodal 

Data 











Node 


X 


y Support' 

-X 

Support-y 

Load-x 

Load-y 

1 

0 . 

00 

0 . 

00 


1 



1 

0 

0 

2 

5. 

00 

0 . 

00 


0 



0 

0 

-5000 

3 

10. 

00 

0 . 

00 


0 



0 

0 

-5000 

4 

15. 

00 

0 . 

00 


0 



0 

0 

-5000 

5 

20. 

00 

0 . 

00 


0 



0 

0 

0 

6 

25. 

00 

0 . 

00 


0 



0 

0 

0 

7 

30. 

00 

0 . 

00 


0 



1 

0 

0 

8 

5. 

00 

2. 

67 


0 



0 

0 

-1000 

9 

10. 

00 

5. 

33 


0 



0 

0 

-1000 

10 

15. 

00 

8 . 

00 


0 



0 

0 

-1000 

11 

20. 

00 

5 . 

33 


0 



0 

0 

-1000 

12 

25. 

00 

2 . 

67 


0 



0 

0 

-1000 


Member Data 
Member Nodel Node2 
112 

2 2 3 

3 3 4 

4 4 5 

5 5 6 

6 6 7 

7 7 12 

8 12 11 

9 11 10 

10 10 9 

119 8 

12 8 1 

13 12 6 

14 12 5 

15 11 5 

16 11 4 

17 9 4 

18 9 3 

19 8 3 

20 8 2 

21 10 4 


Enter the task number: 6 
Solved successfully. 
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Enter the task number: 7 


Reaction Forces 

Node Reaction-x 

Reaction-y 

1 

0.00 

12500.00 

2 

0.00 

0.00 

3 

0.00 

0.00 

4 

0.00 

0.00 

5 

0.00 

0.00 

6 

0.00 

0.00 

7 

0.00 

7500.00 

8 

0.00 

0.00 

9 

0.00 

0.00 

10 

0.00 

0.00 

11 

0.00 

0.00 

12 

0.00 

0.00 


Member 

Forces 

Member 

Force 

1 

23437.50 

2 

23437.50 

3 

17812.50 

4 

13125.00 

5 

14062.50 

6 

14062.50 

7 

-15937.50 

8 

-14875.00 

9 

-13812.50 

10 

-13812.50 

11 

-20187.50 

12 

-26562.50 

13 

0.00 

14 

-1062.50 

15 

500.00 

16 

-1370.73 

17 

-8224.39 

18 

8000.00 

19 

-6375.00 

20 

5000.00 

21 

12000.00 



Enter the task number: 8 

Enter file name (default Datafile): Datafile03_15b 
Enter the task number: 10 


» 
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Table 3.15a Nodal Data for the 21-Bar Truss 

node 

X 

y 

supportx 

supporty 

loadx 

loady 

reactionx 

reactiony 

1 

0 

0 

1 

1 

0 

0 

0 

12500 

2 

5 

0 

0 

0 

0 

-5000 

0 

0 

3 

10 

0 

0 

0 

0 

-5000 

0 

0 

4 

15 

0 

0 

0 

0 

-5000 

0 

0 

5 

20 

0 

0 

0 

0 

0 

0 

0 

6 

25 

0 

0 

0 

0 

0 

0 

0 

7 

30 

0 

0 

1 

0 

0 

0 

7500 

8 

5 

2.6667 

0 

0 

0 

-1000 

0 

0 

9 

10 

5.3333 

0 

0 

0 

-1000 

0 

0 

10 

15 

8 

0 

0 

0 

-1000 

0 

0 

11 

20 

5.3333 

0 

0 

0 

-1000 

0 

0 

12 

25 

2.6667 

0 

0 

0 

-1000 

0 

0 


Table 3.15b Member Data for the 21 -Bar Truss 

member 

nodel 

node2 

force 

1 

1 

2 

23437.5 

2 

2 

3 

23437.5 

3 

3 

4 

17812.5 

4 

4 

5 

13125 

5 

5 

6 

14062.5 

6 

6 

7 

14062.5 

7 

7 

12 

-15937.5 

8 

12 

11 

-14875 

9 

11 

10 

-13812.5 

10 

10 

9 

-13812.5 

11 

9 

8 

-20187.5 

12 

8 

1 

-26562.5 

13 

12 

6 

0 

14 

12 

5 

-1062.5 

15 

11 

5 

500 

16 

11 

4 

-1370.73 

17 

9 

4 

-8224.39 

18 

9 

3 

8000 

19 

8 

3 

-6375 

20 

8 

2 

5000 

21 

10 

4 

12000 


















































3.16 Additional Exercise Problems 169 


3.16 Additional Exercise Problems 


Problem03_03: Functions 

We mentioned, in 3.5[10] (page 136), that the purpose of using functions is modularization and abstraction. In this 
exercise, we use a short program to illustrate the ideas. This program is so short that you may not be able to appreciate 
the ideas of modularization and abstraction. However, as a program becomes large, these ideas are useful. 

Consider Problem02_03 (page 122) again, and generate the same graphic output as before. This time, organize the 
program into a main function and three subfunctions. This is the main function: 

1 clear 

2 [n,p] = getData; 

3 x = 0:n; 

4 fx = Binomial(p, n, x); 

5 drawCurve(x, fx, p, n) 

6 end 

You are asked to implement the three subfunctions: getData, Binomial, and drawCurve. Function getData 
allows the user to input the values of n and p. Function Binomial calculates f(x) of the binomial distribution (see 
Problem02_03, page 122). Function drawCurve produces the graphic output. 




Chapter 4 

Cell Arrays, Structures, Tables, and 
User-Defined Classes 


A data type is also called a 
class. The built-in classes 
we’ve discussed in Chapter 3 
include numeric classes 
(double, int32, etc), character, 
logical, and function handle. 
Cell array and structure 
mentioned in Chapter 1 are also 
built-in classes. A class is 
defined by a set of lower-level 
data and operations on the 
data. For example, the class 
double has a binary data 
representation shown in 2.3 [ 1 ] 
(page 74) and its operations 
include plus, minus, times, etc. 
It is possible to create user- 
defined classes. In a user- 
defined class, the data are 
called the properties, and the 
operations are called the 
methods. 


4.1 Cell Arrays 171 

4.2 Functions of Variable-Length Arguments 175 

4.3 Structures 179 

4.4 Example: Statically Determinate Trusses (Version 3.0) 182 

4.5 Tables 187 

4.6 Conversion of Cell Arrays 191 

4.7 Conversion of Structure Arrays 194 

4.8 Conversion of Tables 197 

4.9 User-Defined Classes 200 
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4.1 Cell Arrays 


Example04_01 a.m 

[2] These commands demonstrate some important concepts about ordinary arrays and cell arrays. A screen output is 
shown in [5], next page. Schematic diagrams of the array b (or c) and d are shown in [3-4]; they are further explained 
in [6], next page. 

1 clear 

2 a = ['David', 'John', 'Stephen'] 

3 b = ['David '; 'John '; 'Stephen'] 

4 size(b) 

5 c = char('David', 'John', 'Stephen') 

6 size(c) 

7 d = {'David', 'John', 'Stephen'} 

8 d(l) 

9 d{l} 

10 d{l}(l) 

11 d{3}(7) 

V_ J 


1—1 

& 

D 

a 

V 

i 

d 



b ( 2 , : ) 

J 

0 

h 

n 




b ( 3, : ) 

S 

t 

e 

P 

h 

e 

n 
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12 » clear 

13 » a = ['David', 'John', 'Stephen'] 

14 a = 

15 'DavidJohnStephen' 

16 » b = ['David '; 'John '; 'Stephen'] 

17 b = 

18 3x7 char array 

19 'David 

20 'John 

21 'Stephen' 

22 » size(b) 

23 ans = 

24 3 7 

25 » c = char('David', 'John', 'Stephen') 

26 c = 

27 3x7 char array 

28 'David 

29 'John 

30 'Stephen' 

31 » size(c) 

32 ans = 

33 3 7 

34 » d = {'David', 'John', 'Stephen'} 

35 d = 

36 1x3 cell array 

37 'David' 'John' 'Stephen' 

38 » d( 1) 

39 ans = 

40 cell 

41 'David' 

42 » d{ 1} 

43 ans = 

44 'David' 

45 » d{ 1} (1) 

46 ans = 

47 'D' 

48 » d{3} ( 7 ) 

49 ans = 

50 'n' 

51 » 
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Example04_0 lb.m 

[7] Like an ordinary array, a cell array may be multi¬ 
dimensional, as demonstrated in the following commands. 
The text output is shown in [8] and the graphic output is in 

[9]. 

52 clear 

53 a = 45; 

54 b = 'David'; 

55 c = [1, 2, 3]; 

56 d = [4, 5; 6, 7]; 

57 e = {a, b; c, d} 

58 disp(e) 

59 celldisp(e) 

60 cellplot(e) 

61 e{1,1} 

62 e{2,1}(2 ) 

63 e{1,2}(1) 

64 e{2,2}(2,1) 

v j 


^jnjxj 


File Edit View Insert Tools Desktop Window Help 


!) £5 jk ^ | 


o ®□ io 


o 



65 

» clear 



66 

» a = 45; 



67 

» b = 'David'; 



68 

» c = [1, 2, 3]; 



69 

» d = [4, 5; 6, 

7]; 


70 

» e = {a, b; c, 

d} 


71 

e = 



72 

2x2 cell array 



73 

[ 45] 


'David' 

74 

[1x3 double] 


[2x2 double] 

75 

» disp(e) 



76 

[ 45] 


'David' 

77 

[1x3 double] 


[2x2 double] 

78 

» celldisp(e) 



79 

e{1,1} = 



80 

45 



81 

e{2,1} = 



82 

1 2 

3 


83 

e{1/2} = 



84 

David 



85 

e{2,2} = 



86 

4 5 



87 

6 7 



88 

» cellplot(e) 



89 

» e{1,1} 



90 

ans = 



91 

45 



92 

CM 

1-1 

Cs) 

Sr 1 

0) 

A 

A 



93 

ans = 



94 

2 



95 

» e{1,2}(1) 



96 

ans = 



97 

'D' 



98 

» e{2,2}(2,1) 



99 

ans = 



100 

6 



101 

» 
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Table 4.1 Cell Arrays 

Function 

Description 

c = cell(n,m) 

Create an n-by-m cell array 

celldisp(c) 

Display cell array contents 

cellplot(c) 

Graphically display cell array 

c = struct2cell(s) 

Convert structure to cell array 

c = table2cell(t) 

Convert table to cell array 

s = cell2struct(c) 

Convert cell array to structure 

t = ce!12table(c) 

Convert table to structure 

Details and More: Help>MATLAB>Language Fundamentals>Data Types>Cell Arrays 
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4.2 Functions of Variable-Length Arguments 


Example04_02a.m: Variable-Length Input Arguments 

[1] Using cell arrays, a function may have variable-length arguments. The following program includes a function (lines 
8-40) that allows variable-length input arguments. The function area (lines 8-40) calculates the area of a circle, square, 
rectangle, or triangle, according to its first input argument. Lines 2-6 are examples of using this function; their output 
are shown in [2], next page. —» 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 


clear 

p = area('circle', 5) 
q = area('square', 6) 
s = area('rectangle', 7, 8) 
t = area('triangle', 'bh', 9, 10) 

u = area('triangle', 'abc ', 5, 6, 1 ) 


function output = area(varargin) 
output = 0; 
switch varargin{l} 

case 'circle' 

if nargin == 2 

r = varargin{2}; 
output = pi*r A 2; 

end 

case 'square' 

if nargin == 2 

a = varargin{2}; 
output = a A 2; 

end 

case 'rectangle' 
if nargin == 3 

b = varargin{2}; 
h = varargin{3}; 
output = b*h; 

end 

case 'triangle' 

if strcmp(varargin{2},'bh') && nargin == 4 
b = varargin{3}; 
h = varargin{4}; 
output = b*h/2; 

elseif strcmp(varargin{2}, 'abc') && nargin == 5 
a = varargin{3}; 
b = varargin{4}; 
c = varargin{5}; 

R = a*b*c/sqrt((a+b+c)*(a-b+c)*(b-c+a)*(c-a+b)); 
output = a*b*c/(4*R); 


end 

end 




end 
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P = 

78.5398 

q = 

36 

s = 

56 

t = 

45 

u = 

14.6969 
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( 

Example04_02b.m: Variable-Length Input/Output 

[4] The following program includes a function (lines 49-78) that not only allows variable-length input arguments but 
also allows variable-length output arguments. The function properties (lines 49-78), in addition to calculate the 
area of a shape, can also calculate the moment of inertia of the shape (Wikipedia> Second moment of area), according to 
the number of output arguments provided by the calling function. See [5], next page, for an output. —» 


41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 


clear 

Ac = properties('circle', 5) 

As = properties('square', 6) 

Ar = properties('rectangle', 7, 8) 

[Ac, Ic] = properties('circle', 5) 

[As, Is] = properties('square', 6) 

[Ar, Ir] = properties('rectangle', 7, 8) 

function varargout = properties(varargin) 
varargout{l} = 0; 
switch varargin{l} 
case 'circle' 

if nargin == 2 

r = varargin{2}; 
varargout{l} = pi*r A 2; 
if nargout == 2 

varargout{2} = pi*r~4/4; 

end 

end 

case 'square' 

if nargin == 2 

a = varargin{2}; 
varargout{l} = a A 2; 
if nargout == 2 

varargout{2} = a^4/12; 

end 

end 

case 'rectangle' 
if nargin == 3 

b = varargin{2}; 
h = varargin{3}; 
varargout{l} = b*h; 
if nargout == 2 

varargout{2} = b*h A 3/12; 

end 

end 
end 


end 




178 Chapter 4 Cell Arrays, Structures, Tables, and User-Defined Classes 


Ac 

78.5398 

As 

36 

Ar 

56 

Ac 

78.5398 

Ic 

= 

490.8739 

As 

36 

Is 

108 

Ar 

56 

Ir 

= 


298.6667 


Table 4.2 Functions of Variable-Length Arguments 

Function 

Description 

varargin 

Cell array containing the list of input arguments 

nargin 

Number of input arguments 

varargout 

Cell array containing the list of output arguments 

nargout 

Number of output arguments 

Details and More: Help>MATLAB>Programming Scripts and Functions>Functions>Input and Output Arguments 
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4.3 Structures 


Example04_03 .in 

[2] Following commands demonstrate creations and manipulations of structures. A screen output is shown in [3-4]. 

1 clear 

2 node.x = 1; 

3 node.y = 1; 

4 node.supportx = 0; 

5 node.supporty = 0; 

6 node.loadx = 0; 

7 node.loady = -1000; 

8 disp(node) 

9 clear 

10 node = struct('x',1,'y',1,'supportx',0supporty' , 0 , 'loadx',0loady-1000) 

11 Nodes(1) = node 

12 Nodes(2) = struct ('x',0,'y',0,' supportx',1,'supporty' , 1, 'loadx' , 0, 'loady',()); 

13 Nodes(3) = struct ('x',2,'y',0 r ' supportx',0 ,' supporty',1,'loadx',0,'loady',0); 

14 disp(Nodes) 

15 Nodes(l).x = 5.6; 

16 disp(Nodes(1)) 

17 disp(node) 

18 fieldnames(Nodes) 

V_ ) 


19 

» 

clear 


20 

» 

node.x = 1; 


21 

» 

node.y = 1; 


22 

» 

node.supportx = 0; 

23 

» 

node.supporty = 0; 

24 

» 

node.loadx 

= 0; 

25 

» 

node.loady 

= -1000 

26 

» 

disp(node) 


27 


x: 

1 

28 


y: 

1 

29 


supportx: 

0 

30 


supporty: 

0 
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33 

» clear 


34 

» node = struct('x',1,'y',1,'supportx',0,'supporty',0,'loadx',0,'loady',-1000) 

35 

node = 


36 

37 

struct with fields: 


38 

39 

x: 1 
y: 1 

[4] Screen output of 

40 

supportx: 0 

Example04 03.m 

41 

supporty: 0 

(Continued). —» 

42 

loadx: 0 


43 

loady: -1000 


44 

» Nodes(1) = node 


45 

Nodes = 


46 

47 

struct with fields: 


48 

x: 1 


49 

y: 1 


50 

supportx: 0 


51 

supporty: 0 


52 

loadx: 0 


53 

loady: -1000 


54 

» Nodes(2) = struct('x , ,0, , y , ,0,'supportx',1,'supporty',1,'loadx' 

,0,'loady’,0); 

55 

» Nodes(3) = struct('x',2,'y',0,'supportx',0,'supporty',1,'loadx' 

,0,'loady’,0); 

56 

» disp(Nodes) 


57 

1x3 struct array with fields: 


58 

X 


59 

y 


60 

supportx 


61 

supporty 


62 

loadx 


63 

loady 


64 

» Nodes(l).x = 5.6; 


65 

» disp(Nodes(1)) 


66 

x: 5.6000 


67 

y: 1 


68 

supportx: 0 


69 

supporty: 0 


70 

loadx: 0 


71 

loady: -1000 


72 

» disp(node) 


73 

x: 1 


74 

y: 1 


75 

supportx: 0 


76 

supporty: 0 


77 

loadx: 0 


78 

loady: -1000 


79 

» fieldnames(Nodes) 


80 

ans = 


81 

6x1 cell array 


82 

' x' 


83 

'y' 


84 

'supportx' 


85 

'supporty ' 


86 

' loadx ' 


87 

' loady ' 
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Table 4.3 Structures 

Function 

Description 

s = struct(field,v) 

Create structure, equivalent to s.field = v 

s = rmfield(s,field) 

Remove fields from structure 

names = fieldnames(s) 

Return a cell array of strings containing the names of the fields in a structure 

s = cell2struct(c) 

Convert cell array to structure 

s = table2struct(t) 

Convert table to structure 

c = struct2cell(s) 

Convert structure to cell 

t = struct2table(s) 

Convert structure to table 

Details and More: Help>MATLAB>Language Fundamentals>Data Types>Structures 
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4.4 Example: Statically Determinate Trusses (Version 3.0) 


Example04_04.m: Truss 3.0 

[1] This is a modification of the program Example03_15.m by replacing the matrices Nodes and Members with two 
structure arrays. The modification should enhance the readability of the program. Now, open Example03_15.ru and 
save as Example04_04.ru and modify the program as described in [2-11]. 

1 clear 

2 Nodes = struct; Members = struct; 


3 

disp(' 

1. 

Input nodal coordinates') 

4 

disp(' 

2. 

Input connecting nodes of members') 

5 

disp(' 

3. 

Input three supports') 

6 

disp(' 

4. 

Input loads') 

7 

disp(' 

5. 

Print truss') 

8 

disp(' 

6. 

Solve truss') 

9 

disp(' 

7. 

Print results') 

10 

disp(' 

8. 

Save data') 

11 

disp(' 

9. 

Load data') 

12 

disp(' 

10. 

Quit') 

13 

while 1 



14 

task = 

input('Enter the task number: '); 

15 

switch 

task 


16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 


inputNodes(Nodes); 

= inputMembers(Members); 
inputSupports(Nodes); 
inputLoads(Nodes); 


case 1 

Nodes = 
case 2 

Members 
case 3 

Nodes = 
case 4 

Nodes = 
case 5 

printTruss(Nodes, Members) 
case 6 

[Nodes, Members] = solveTruss(Nodes, Members); 
case 7 

printResults(Nodes, Members) 
case 8 

saveAll(Nodes, Members) 
case 9 

[Nodes, Members] = loadAll; 
case 10 
break 


end 


end 
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39 function output = inputNodes(Nodes) 

40 while 1 

41 data = input('Enter [node, x, y] or 0 to stop: '); 

42 if data(l) == 0 

43 break 

44 else 

45 Nodes(data(1)).x = data(2); 

46 Nodes(data(1)).y = data(3); 

4 7 end 

4 8 end 

49 output = Nodes; 

5 0 end 

51 

52 function output = inputMembers(Members) 

53 m = 0; 

54 while 1 

55 data = input('Enter [nodel, node2] or 0 to stop: '); 

56 if data(l) == 0 

57 break 

58 else 

59 m = m+1; 

60 Members(m).nodel = data(l); 

61 Members(m).node2 = data(2); 

62 end 

63 end 

64 output = Members; 

65 end 

66 

67 function output = inputSupports(Nodes) 

68 for i = 1:size(Nodes,2) 

6 9 Nodes(i).supportx = 0; 

70 Nodes(i).supporty = 0; 

71 end 

72 for k = 1:3 

73 data = input('Enter [node, dir] (dir: ''x'' or ' 1 y' 1 ): '); 

74 if data(2) == 'x' 

75 Nodes(data(1)).supportx = 1; 

76 elseif data(2) == 'y' 

77 Nodes(data(1)).supporty = 1; 

7 8 end 

7 9 end 

80 output = Nodes; 

81 end 

82 



184 Chapter 4 Cell Arrays, Structures, Tables, and User-Defined Classes 


83 function output = inputLoads(Nodes) 

84 for i = 1:size(Nodes,2) 

85 Nodes(i).loadx = 0; 

86 Nodes(i).loady = 0; 

87 end 

88 while 1 

89 data = input('Enter [node, load-x, load-y] or 0 to stop: '); 

90 if data(l) == 0 

91 break 

92 else 

93 Nodes(data(1)).loadx = data(2); 

94 Nodes(data(1)).loady = data(3); 

95 end 

96 end 

97 output = Nodes; 

98 end 

99 

100 function printTruss(Nodes, Members) 

101 if (size(fieldnames(Nodes),1)<6 || size(fieldnames(Members),1)<2) 

102 disp('Truss data not complete'); return 

103 end 

104 fprintf('\nNodal Data\n') 

105 fprintf('Node x y Support-x Support-y Load-x Load-y\n') 

106 for k = 1:size(Nodes,2) 

107 fprintf('%4.Of%9.2f%9.2f%11.Of%11.Of%9.Of%9.Of\n', ... 

108 k, Nodes(k).x, Nodes(k).y, ... 

109 Nodes(k).supportx, Nodes(k).supporty, ... 

110 Nodes(k).loadx. Nodes(k).loady) 

111 end 

112 fprintf( 1 \nMember Data\n') 

113 fprintf('Member Nodel Node2\n') 

114 for k = 1:size(Members,2) 

115 fprintf('%4.Of%9.Of%9.Of\n', k. Members(k).nodel, Members(k).node2) 

116 end 

117 end 

118 
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119 function printResults(Nodes, Members) 

120 if (size(fieldnames(Nodes),1)<8 || size(fieldnames(Members),1)<3) 

121 disp('Results not available!'), return 

122 end 

123 fprintf('\nReaction ForcesXn') 

124 fprintf('Node Reaction-x Reaction-y\n') 

125 for k = 1:size(Nodes,2) 

126 fprintf('%4.Of%12.2f%12.2f\n', k, Nodes(k).reactionx, Nodes(k).reactiony) 

12 7 end 

128 fprintf('\nMember ForcesXn') 

129 fprintf('Member ForceXn') 

130 for k = 1:size(Members,2) 

131 fprintf('%4.Of% 12.2f\n', k, Members(k).force) 

132 end 

133 end 

134 

135 function saveAll(Nodes, Members) 

136 fileName = input('Enter file name (default Datafile): ', 's'); 

137 if isempty(fileName) 

138 fileName = 'Datafile'; 

139 end 

140 save(fileName, 'Nodes', 'Members') 

141 end 

142 

143 function [Nodes, Members] = loadAll 

144 fileName = input('Enter file name (default Datafile): ', 's'); 

145 if isempty(fileName) 

146 fileName = 'Datafile'; 

147 end 

148 load(fileName) 

14 9 end 

150 

151 function [outNodes, outMembers] = solveTruss(Nodes, Members) 

152 n = size(Nodes ,2 ); m = size(Members ,2 ); 

153 if (m+3) < 2*n 

154 disp('Unstable!') 

155 outNodes = 0; outMembers = 0; return 

156 elseif (m+3) > 2*n 

157 disp('Statically indeterminate!') 

158 outNodes = 0; outMembers = 0; return 

159 end 
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160 

A = 

zeros(2*n, 2*n); loads = zeros(2*n,1); nsupport 

161 

for 

i = 1: n 

162 


for j = Ism 

163 


if Members(j).node1 == i || Members(j).node2 

164 


if Members(j).node1 == i 

165 


nl = i; n2 = Members(j).node2; 

166 


elseif Members(j).node2 == i 

167 


nl = i; n2 = Members(j).node1; 

168 


end 

169 


xl = Nodes(nl).x; yl = Nodes(nl).y; 

170 


x2 = Nodes(n2).x; y2 = Nodes(n2).y; 

171 


L = sqrt((x2-xl) A 2+(y2-yl) *2 ); 

172 


A(2*i-l,j) = (x2-xl)/L; 

173 


A(2*i, j) = (y2-yl)/L; 

174 


end 

175 


end 

176 


if (Nodes(i).supportx == 1) 

177 


nsupport = nsupport+1; 

178 


A(2*i-1,m+nsupport) = 1; 

179 


end 

180 


if (Nodes(i).supporty == 1) 

181 


nsupport = nsupport+1; 

182 


A(2*i, m+nsupport) = 1; 

183 


end 

184 


loads(2*i-l) = -Nodes(i).loadx; 

185 


loads(2*i) = -Nodes(i).loady; 

186 

end 


187 

forces = A\loads; 

188 

for 

j = 1 :m 

189 


Members(j).force = forces(j); 

190 

end 


191 

nsupport = 0; 

192 

for 

i = 1 s n 

193 


Nodes(i).reactionx = 0; 

194 


Nodes(i).reactiony = 0; 

195 


if (Nodes(i).supportx == 1) 

196 


nsupport = nsupport+1; 

197 


Nodes(i).reactionx = forces(m+nsupport); 

198 


end 

199 


if (Nodes(i).supporty == 1) 

200 


nsupport = nsupport+1; 

201 


Nodes(i).reactiony = forces(m+nsupport); 

202 


end 

203 

end 


204 

outNodes = Nodes; outMembers = Members; 

205 

disp('Solved successfully.') 

206 

end 
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4.5 Tables 


Example04_05 .in 

[2] The following commands demonstrate the creation and manipulation of tables. A screen output is shown in [3-4] 
-> 

1 clear 

2 x= [1, 0, 2]'; y = [1, 0, 0] 1 ; 

3 supportx = [0, 1, 0]'; supporty = [0, 1, 1]'; 

4 loadx = [0, 00]'; loady = [-1000, 0, 0]'; 

5 Nodes = table(x, y, supportx, supporty, loadx, loady) 

6 Nodes.Properties 

7 Nodes.Properties.RowNames = {'top', 'left', 'right'}; 

8 disp(Nodes) 

9 size(Nodes) 

10 Nodes = sortrows(Nodes, {'x', 1 y'}) 

11 node = Nodes(2,:) 

12 Nodes(4,:) = array2table([2, 2, 0, 0, 100, 200]); 

13 Nodes.Properties.RowNames{4} = 'node4'; 

14 Nodes(5,:) = cell2table({0, 2, 0, 0, 0, 0}); 

15 n = struct('x', 1.5, 'y', 0.5, ... 

16 'supportx', 0, 'supporty', 0, 'loadx', 0, 'loady',0); 

17 Nodes = [Nodes; struct2table(n)]; 

18 Nodes(6,5) = array2table(300); 

19 class(Nodes(6,5)) 

20 Nodes.loady(6) = 150; 

21 class(Nodes.loadx(6)) 

22 disp(Nodes) 

23 Nodes(4:6,:) = []; 

24 disp(Nodes) 

25 Nodes(1:3,:) = []; 

26 size(Nodes) 




188 Chapter 4 Cell Arrays, Structures, Tables, and User-Defined Classes 


27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 


» clear 

» x = [1, 0, 2]'; y = [1, 0, 0 ] ' ; 

» supportx = [0, 1, 0]'; supporty = [0, 1, 1]'; 

» loadx = [0, 0 0]'; loady = [-1000, 0, 0]'; 

» Nodes = table(x, y, supportx, supporty, loadx, loady) 
Nodes = 


3x6 table 



X 

y supportx 

supporty loadx 

loady 

1 

1 0 

0 0 

-1000 

0 

0 1 

1 0 

0 

2 

0 0 

1 0 

0 

» Nodes, 

.Properties 



ans = 




struct 

with fields: 




Description: 

• ■ 



UserData: 

1 ] 



DimensionNames: 

{'Row' 'Variables'} 



VariableNames: 

{'x' 'y ' 'supportx ' 

' supporty ' ' loadx ' ' loady ' } 

VariableDescriptions : 

{} 



VariableUnits : 

{} 



RowNames: 

{} 



» Nodes.Properties. 
» disp(Nodes) 

RowNames = 

{'top', 'left' 

, 'right'}; 


x y 

supportx 

supporty 

loadx 

loady 

top 1 1 

0 

0 

0 

-1000 

left 0 0 

1 

1 

0 

0 

right 200 

» size(Nodes) 

ans = 

3 6 

» Nodes = sortrows(Nodes, {'x' 

Nodes = 

3x6 table 

1 

, 'y'}) 

0 

0 

x y 

supportx 

supporty 

loadx 

loady 

left 0 0 

1 

1 

0 

0 

top 1 1 

0 

0 

0 

-1000 

right 2 0 

» node = Nodes(2,:) 

node = 

1x6 table 

0 

1 

0 

0 

x y 

supportx 

supporty 

loadx loady 


top 110 


0 


0 


-1000 
























74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 
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» Nodes(4,:) = array2table([2, 2, 0, 0, 100, 200]); 

» Nodes.Properties.RowNames{4} = 'node4'; 

» Nodes(5,:) = cell2table({0, 2, 0, 0, 0, 0}); 

» n = struct('x', 1.5, 'y', 0.5, ... 

'supportx', 0, 'supporty', 0, 'loadx', 0, 'loady',0); 

» Nodes = [Nodes; struct2table(n)]; 

» Nodes(6,5) = array2table(300); 

» class(Nodes(6,5)) 
ans = 

'table' 

» Nodes.loady(6) = 150; 

» class(Nodes.loadx(6)) 
ans = 

'double' 

» disp(Nodes) 


x 


y supportx supporty loadx loady 


left 0 01 

top 1 10 

right 2 00 

node4 2 20 

Row5 0 20 

Row6 1.5 0.5 0 


1 

0 

1 

0 

0 

0 


100 

0 

300 


0 

0 

0 


-1000 

0 

200 

0 

150 


0 


» Nodes(4:6,:) = []; 
» disp(Nodes) 


x y supportx 


supporty loadx loady 


left 001 

top 110 

right 200 


1 

0 

1 


0 

0 

0 


-1000 

0 


0 


» Nodes(1:3,:) = []; 
» size(Nodes) 
ans = 


0 6 
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Table 4.5 Tables 

Function 

Description 

t = table(vl,v2,...) 

Create table from variables 

t = array2table(a) 

Convert array to table 

t = cell2table(c) 

Convert cell array to table 

t = struct2table(s) 

Convert structure to table 

a = table2array(t) 

Convert table to array 

c = table2cell(t) 

Convert table to cell 

s = table2struct(t) 

Convert table to structure 

t = sortrows(t) 

Sort rows of array or table 

T.Properties 

Properties of table T 

Details and More: Help>MATLAB>Language Fundamentals>Data Types> Tables 
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4.6 Conversion of Cell Arrays 


Name 

Abbreviation 

Melting 

Temperature 

(°C) 

Crystallization 

Temperature 

(°C) 

Density 

(g/cm 3 ) 

Polyethylene 

PE 

135 

56 

0.96 

Polypropylene 

PP 

171 

86 

0.95 

Polyoxymethylene 

POM 

180 

90 

1.42 

Polyethylene terephthalate 

PET 

266 

158 

1.38 


r \ 

Example04_06.m: Polymer Database 

[2] This script first creates a cell array to store the information (lines 2-5), then converts the cell array to a structure 
array using the function cel 12 struct (lines 9-10), and finally converts the cell array to a table using the function 
cell2table (line 14). In each stage, it displays PET's name and melting temperature (lines 6-7, 11-12, and 15-18) to 
demonstrate the access of data. —> 


1 

2 

clear 

Polymer Cell = {'Polyethylene', 

'PE' , 

135, 

56, 

0.96; 

3 

'Polypropylene', 

'PP' , 

171, 

86, 

0.95; 

4 

'Polyoxymethylene', 

’POM’, 

180, 

90, 

1.42; 

5 

'Polyethylene terephthalate'. 

’PET', 

266, 

158, 

1.38}; 

6 

7 

PET_Name = Polymer_Cell{4,1} 

PET Melting = Polymer Cell{4,3} 






8 

9 Field = {'Name', 'Abbreviation', 'Melting', 'Crystallization', 'Density'}; 

10 Polymer_Structure = cell2struct(Polymer_Cell, Field, 2); 

11 PET_Name = Polymer_Structure(4).Name 

12 PET_Melting = Polymer_Structure(4).Melting 

13 

14 Polymer_Table = cell2table(Polymer_Cell, 'VariableNames', Field); 

15 PET_Name = Polymer_Table.Name(4) 

16 PET_Melting = Polymer_Table.Melting(4) 

17 PET_Name = Polymer_Table(4,1) 

18 PET_Melting = Polymer_Table(4,3) 

v_ J 
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19 

» clear 





20 

» Polymer_Cell = {'Polyethylene', 

'PE' , 

135, 

56, 

0.96; 

21 

'Polypropylene', 

'PP' , 

171, 

86, 

0.95; 

22 

'Polyoxymethylene', 

'POM', 

180, 

90, 

1.42; 

23 

'Polyethylene terephthalate', 

'PET', 

266, 

158, 

1.38} 


24 » PET_Name = Polymer_Cell{4,1} 

25 PET_Name = 

26 'Polyethylene terephthalate' 

27 » PET_Melting = Polymer_Cell{4,3} 

28 PET_Melting = 

29 266 

30 » 

31 » Field = { 1 Name', 'Abbreviation', 'Melting', 'Crystallization', 'Density'}; 

32 » Polymer_Structure = cell2struct(Polymer_Cell, Field, 2); 

33 » PET_Name = Polymer_Structure(4).Name 

34 PET_Name = 

35 'Polyethylene terephthalate' 

36 » PET_Melting = Polymer_Structure(4).Melting 

37 PET_Melting = 

38 266 

39 » 

40 » Polymer_Table = cell2table(Polymer_Cell, 'VariableNames', Field); 

41 » PET_Name = Polymer_Table .Name ( 4 ) 

42 PET_Name = 

43 cell 

44 'Polyethylene terephthalate' 

45 » PET_Melting = Polymer_Table.Melting(4) 

46 PET_Melting = 

47 266 

48 » PET_Name = Polymer_Table(4,1) 

49 PET_Name = 

50 table 

51 Name 

52 _ 

53 'Polyethylene terephthalate' 

54 » PET_Melting = Polymer_Table(4,3) 

55 PET_Melting = 

56 table 

57 Melting 

58 _ 

59 266 
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4.7 Conversion of Structure Arrays 


Example04_07.m: Polymer Database 

1 

[2] This script creates a structure array storing the polymer data (lines 2-21), converts the structure array to a cell 

array using the function struct2cell (line 25), and converts the structure array to a table using the function 

struct2table (line 30). In each stage, it displays PET’s name and melting temperature (lines 22-23, 27-28, and 

31-34) to demonstrate the access of data. —» 


1 

clear 


2 

Polymer_Structure = [struct('Name', 'Polyethylene', 


3 

'Abbreviation', 'PE', 


4 

'Melting', 135, 


5 

'Crystallization', 56, 


6 

'Density', 0.96); 


7 

struct('Name', 'Polypropylene', 


8 

'Abbreviation', 'PP', 


9 

'Melting', 171, 


10 

'Crystallization', 86, 


11 

'Density', 0.95); 


12 

struct('Name', 'Polyoxymethylene', 


13 

'Abbreviation', 'POM', 


14 

'Melting', 180, 


15 

'Crystallization', 90, 


16 

'Density', 1.42); 


17 

struct('Name', 'Polyethylene terephthalate', 


18 

'Abbreviation', 'PET', 


19 

'Melting', 266, 


20 

'Crystallization', 158', 


21 

'Density', 1.38)]; 


22 

PET_Name = Polymer_Structure(4).Name 


23 

PET_Melting = Polymer_Structure(4).Melting 


24 



25 

Polymer_Cell = struct2cell(Polymer_Structure); 


26 

Polymer Cell = Polymer Cell'; 


27 

PET Name = Polymer Cell{4,1} 


28 

PET Melting = Polymer Cell{4,3} 


29 



30 

Polymer_Table = struct2table(Polymer_Structure); 


31 

PET_Name = Polymer_Table.Name(4) 


32 

PET Melting = Polymer Table.Melting(4) 


33 

PET Name = Polymer Table(4,1) 


34 

V 

PET Melting = Polymer Table(4,3) 

J 








35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 
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» clear 

» Polymer_Structure = [struct('Name', 'Polyethylene', 

'Abbreviation', 'PE', 

'Melting', 135, 

'Crystallization', 56, 

'Density', 0.96); 

struct('Name', 'Polypropylene', 

'Abbreviation', 'PP', 

'Melting', 171, 

'Crystallization', 86, 

'Density', 0.95); 

struct('Name', 'Polyoxymethylene', 

'Abbreviation', 'POM', 

'Melting', 180, 

'Crystallization', 90, 

'Density', 1.42); 

struct('Name', 'Polyethylene terephthalate', 
'Abbreviation', 'PET', 

'Melting', 266, 

'Crystallization', 158', 

'Density', 1.38)]; 

» PET_Name = Polymer_Structure(4).Name 
PET_Name = 

'Polyethylene terephthalate' 

» PET_Melting = Polymer_Structure(4).Melting 
PET_Melting = 

266 

» 

» Polymer_Cell = struct2cell(Polymer_Structure); 

» Polymer_Cell = Polymer_Cell'; 

» PET_Name = Polymer_Cell{4,1} 

PET_Name = 

'Polyethylene terephthalate' 

» PET_Melting = Polymer_Cell{4,3} 

PET_Melting = 

266 

» 

» Polymer_Table = struct2table(Polymer_Structure); 

» PET_Name = Polymer_Table.Name(4) 

PET_Name = 

cell 

'Polyethylene terephthalate' 

» PET_Melting = Polymer_Table.Melting(4) 

PET_Melting = 

266 

» PET_Name = Polymer_Table(4,1) 

PET_Name = 

table 

Name 


'Polyethylene terephthalate' 

» PET_Melting = Polymer_Table(4,3) 
PET_Melting = 

table 

Melting 


266 
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Workspace 





Name L. 

Value 

Size 

Bytes 

Class 

PET_Meltirxg 

lxl able 

lxl 

876 

table 

PET_Name 

lxl able 

lxl 

1026 

table 

{_L Polymer_Cell 

4x5 cell 

4x5 

2490 

cell 

-§i Polymer_Structure 

4x1 struct 

4x1 

2810 

struct 

Polymer_Table 

4x5 Cable 

4x5 

2986 

table 
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4.8 Conversion of Tables 


( \ 

Example04_08.m: Polymer Database 

[2] This script creates a table storing the polymer data (lines 2-8), converts the table to a cell array using the function 
table2cell (line 14), and converts the table to a structure array using the function table2struct (line 18). In 
each stage, it displays PET’s name and melting temperature (lines 9-12, 15-16, and 19-20) to demonstrate the access of 
data. 

1 clear 

2 Name = {'Polyethylene', 'Polypropylene', 'Polyoxymethylene', ... 

3 'Polyethylene terephthalate'}'; 

4 Abbreviation = {'PE', 'PP', 'POM', 'PET'}'; 

5 Melting = [135, 171, 180, 266]'; 

6 Crystallization = [56, 86, 90, 1585]'; 

7 Density = [0.96, 0.95, 1.42, 1.38]'; 

8 Polymer_Table = table(Name,Abbreviation,Melting,Crystallization,Density); 

9 PET_Name = Polymer_Table.Name(4) 

10 PET_Melting = Polymer_Table.Melting(4) 

11 PET_Name = Polymer_Table(4,1) 

12 PET_Melting = Polymer_Table(4,3) 

13 

14 Polymer_Cell = table2cell(Polymer_Table); 

15 PET_Name = Polymer_Cell{4,1} 

16 PET_Melting = Polymer_Cell{4,3} 

17 

18 Polymer_Structure = table2struct(Polymer_Table); 

19 PET_Name = Polymer_Structure(4).Name 

20 PET_Melting = Polymer_Structure(4).Melting 

V_ j 
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21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 
63 


» clear 

» Name = {'Polyethylene', 'Polypropylene', 'Polyoxymethylene', ... 

'Polyethylene terephthalate'}'; 

» Abbreviation = {'PE', ' PP' , 'POM', 'PET'}'; 

» Melting = [135, 171, 180, 266]'; 

» Crystallization = [56, 86, 90, 1585]'; 

» Density = [0.96, 0.95, 1.42, 1.38]'; 

» Polymer_Table = table(Name,Abbreviation,Melting,Crystallization,Density); 
» PET_Name = Polymer_Table.Name(4) 

PET_Name = 

cell 

'Polyethylene terephthalate' 

» PET_Melting = Polymer_Table.Melting(4) 

PET_Melting = 

266 

» PET_Name = Polymer_Table(4,1) 

PET_Name = 

table 

Name 


'Polyethylene terephthalate' 

» PET_Melting = Polymer_Table(4,3) 
PET_Melting = 

table 

Melting 


266 

» 

» Polymer_Cell = table2cell(Polymer_Table); 

» PET_Name = Polymer_Cell{4,1} 

PET_Name = 

'Polyethylene terephthalate' 

» PET_Melting = Polymer_Cell{4,3} 

PET_Melting = 

266 

» 

» Polymer_Structure = table2struct(Polymer_Table); 
» PET_Name = Polymer_Structure(4).Name 
PET_Name = 

'Polyethylene terephthalate' 

» PET_Melting = Polymer_Structure(4).Melting 
PET_Melting = 

266 
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4.9 User-Defined Classes 


Poly.m 

[2] Type the following statements and save in the Current Folder as Poly.m (the file name must be consistent with the 
class name, specified in line 1). The class Poly is an implementation of the polynomial (Wikipedia> Polynomial), 
including its representing data structure and some operations on the polynomial. This is a simple demonstration of user- 
defined class. We’ll show you the application of this class in [4]. (Continued at [3], next page.) —» 

1 classdef Poly 

2 properties 

3 coef = zeros(1,99); 

4 end 

5 methods 

6 function p = Poly(varargin) 

7 for k = 1 margin 

8 p.coef(nargin-k+1) = vararginfk}; 

9 end 


10 

end 

11 

function disp(p) 

12 

for k = 992-1:3 

13 

if p.coef(k) 

14 

fprintf('%+fx A %d', 

15 

end 

16 

end 

17 

if p.coef(2) 

18 

fprintf('%+fx', p.coef( 

19 

end 

20 

fprintf('%+f\n', p.coef(1)) 

21 

end 

22 

function p = plus(pi, p2) 

23 

p = Poly; 

24 

p.coef = pi.coef+p2.coef; 

25 

end 

26 

function p = minus(pi, p2) 

27 

p = Poly; 

28 

p.coef = pi.coef-p2.coef; 

29 

end 

30 

function p = uminus(pl) 

31 

p = Poly; 

32 

p.coef = -pi.coef; 

33 

end 


p.coef(k), k-1); 




4.9 User-Defined Classes 201 


r \ 

[3] Poly.m (Continued) 


34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 


function p = uplus(pl) 
p = Poly; 
p.coef = pl.coef; 

end 

function p = mtimes(pl, p2) 
p = Poly; 
for i = 1:99 

for j = 1:99 

if pl.coef(i) && p2.coef(j) 

p.coef(i+j-1) = p.coef(i+j-1)+pl.coef(i)*p2.coef(j); 

end 

end 

end 

end 

function output = value(p, x) 

output = zeros(l,length(x)); 
for k = 1:99 

if p.coef(k) 

output = output + p.coef(k)*x. A (k-1); 

end 

end 

end 

end 


end 


58 » clear 

59 » a = Poly(3,2,l) 

60 a = 

61 +3.000000x^2+2.000000x+1.000000 

62 » b = Poly(5,6) 

63 b = 

64 +5.OOOOOOx+6.000000 

65 » c = Poly(8) 

66 c = 

67 +8.000000 

68 » d = a+b 

69 d = 

70 +3.000000x^2+7.000000x+7.000000 

71 » e = -a-b*(-c+a) 

72 e = 

73 -15.000000x A 3-31.000000x A 2+21.00000Ox+41.000000 

74 » value(e, 2.5) 

75 ans = 

76 -334.6250 

77 » x = linspace(-3,3); 

78 » y = value(e,x); 

79 » plot(x,y) 
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Differentiation and Integration of a Polynomial 

[9] You may implement the differentiation and integration of a polynomial by adding the following two functions into 
the methods section of the class Poly: 

function p = diff(pl) 
p = Poly; 
for k = 2:99 

if pl.coef(k) 

p.coef(k-l) = pi.coef(k)*(k-1); 

end 

end 

end 

function p = int(pl) 
p = Poly; 
for k = 1:99 

if pl.coef(k) 

p.coef(ktl) = pi.coef(k)/k; 

end 

end 

end 

And you may test-run the new version of Poly by continuing the commands in Example04_09.m ([4], page 201): 

» f = int(e) 
f = 

-3.750000x^4-10.333333x^3+10.500000x^2+4l.OOOOOOx+O.000000 
» g = diff(f) 

g = 

-15.000000x^3-31.000000x^2+21.000000x+41.000000 
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4.10 Additional Exercise Problems 




Atomic 

Atomic 

Name 

Symbol 

Number 

Mass 

Carbon 

c 

6 

12.011 

Helium 

He 

2 

4.003 

Hydrogen 

H 

1 

1.008 

Nitrogen 

N 

7 

14.007 

Oxygen 

0 

8 

15.999 




Atomic 

Atomic 

Name 

Symbol 

Number 

Mass 

Sodium 

Na 

11 

22.990 

Chlorine 

Cl 

17 

35.453 
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Chapter 5 

Data Visualization: Plots 


Visual perception is the most 
efficient way of understanding 
data. MATLAB provides many 
forms of plots to aid engineers 
in presenting their data in 
various visual forms. 
Familiarizing yourself with 
these plotting techniques will 
facilitate your presentation of 
data. 


5.1 Graphics Objects and Parent-Children Relationship 207 

5.2 Graphics Objects Properties 212 

5.3 Figure Objects 216 

5.4 Axes Obj ects 218 

5.5 Line Objects 224 

5.6 Text Objects 227 

5.7 Legend Objects 231 

5.8 Bar Plots 233 

5.9 Pie Plots 235 

5.10 3-D Line Plots 237 

5.11 Surface and Mesh Plots 239 

5.12 Contour Plots 245 

5.13 Vector Plots 248 

5.14 Streamline Plots 250 

5.15 Isosurface Plots 252 

5.16 Additional Exercise Problems 253 
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5.1 Graphics Objects and Parent-Children Relationship 




File Edit View Insert Tools Desktop Window Help 

'j a d ^ | d | \ s o ® ® 7 . • | s 


□ @ 


Trajectory of a Ball 



Initial velocity (m/s) 
U 


Elevation angle (deg) 

r - *— 


Throw 



/ \ 

Example05_01 a.m 

[2] The following commands create some graphics objects and 
demonstrate the parent-children relationship among these graphic objects. 


1 clear 

2 x = linspace(0,2*pi); 

3 y = sin(x); 

4 hCurve = plot(x,y); 

5 hCurve.Parent 

6 hAxes = hCurve.Parent; 

7 hAxes.Parent 

8 hFigure = hAxes.Parent; 

9 hFigure.Parent 

10 hRoot = hFigure.Parent; 

11 hRoot.Parent 

12 hRoot.Children 

13 hFigure.Children 

14 hAxes.Children 

15 hCurve.Children 

16 delete(hCurve) 

17 delete(hAxes) 

18 delete(hFigure) 



File Edit View Insert Tools Desktop Window Help 


a a .j ; i* % ^ : a | o 


^jnjxj 


i 

0.8 

0.6 

0.4 

0.2 

0 

•02 

- 0.4 

- 0.6 

- 0.8 

-1 
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J 


V. 
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» clear 

» x = linspace(0,2*pi); 
» y = sin(x); 

» hCurve = plot(x,y); 

» hCurve.Parent 
ans = 

Axes with properties: 


XLim: 
YLim: 
XScale: 
YScale: 
GridLineStyle: 
Position: 
Units: 


[0 7] 

[-1 1 ] 

'linear' 

'linear' 

[0.1300 0.1100 0.7750 0.8150] 
'normalized' 


Show all properties 
» hAxes = hCurve.Parent; 

» hAxes.Parent 
ans = 

Figure (1) with properties: 


Number: 1 
Name: ' 


Color: [0.9400 0.9400 0.9400] 
Position: [1000 918 560 420] 
Units: 'pixels' 


Show all properties 
» hFigure = hAxes.Parent; 

» hFigure.Parent 
ans = 

Graphics Root with properties: 


CurrentFigure: [lxl Figure] 
ScreenPixelsPerlnch: 72 

ScreenSize: [1 1 2560 1440] 
MonitorPositions: [1 1 2560 1440] 
Units: 'pixels' 


Show all properties 
» hRoot = hFigure.Parent; 

» hRoot.Parent 
ans = 

OxQ empty GraphicsPlaceholder array. 
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64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 


» hRoot.Children 
ans = 

Figure (1) with properties: 


Number: 1 
Name: ' 


Color: [0.9400 0.9400 0.9400] 
Position: [1000 918 560 420] 
Units: 'pixels' 


Show all properties 
» hFigure.Children 
ans = 

Axes with properties: 


XLim: 
YLim: 
XScale: 
YScale: 
GridLineStyle: 
Position: 
Units: 


[0 7] 

[-1 1 ] 

'linear' 

'linear' 

[0.1300 0.1100 0.7750 0.8150] 
'normalized' 


Show all properties 
» hAxes.Children 
ans = 

Line with properties: 


Color: 
LineStyle: 
LineWidth: 
Marker: 
MarkerSize: 
MarkerFaceColor: 

XData: 
YData: 
ZData: 


[0 0.4470 0.7410] 

0.5000 
'none' 

6 

'none' 

[1x100 double] 
[1x100 double] 
[lxQ double] 


Show all properties 
» hCurve.Children 
ans = 

0x0 empty GraphicsPlaceholder array. 
» delete(hCurve) 

» delete(hAxes) 

» delete(hFigure) 
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/ \ 

Example05_0 lb.m 

[7] In Example05_01a.m, when a Line is created, a Figure and an Axes 
are automatically created. It is possible to create Figures and Axes 
manually. The following commands demonstrate manual creation of a 
Figure and an Axes before creation of three Line objects as children of 
the Axes. 

109 clear 

110 x = linspace(0,2*pi); 

111 figure 

112 axes('XLim', [0,2*pi], 'YLim', [-1,1]) 

113 hold on 

114 plot(x, sin(x), x, cos(x)) 

115 plot([0,2*pi],[0,0]) 

116 hAxes = gca; 

117 hCurve = hAxes.Children 

118 delete(hCurve(1) ) 

119 delete(hCurve(2)) 

120 delete(hAxes) 

121 delete(gcf) 

v_ ) 


122 » clear 

123 » x = linspace(0,2*pi); 

124 » figure 

125 » axes('XLim', [0,2*pi], 'YLim', [-1,1]) 

126 » hold on 

127 » plot(x, sin(x), x, cos(x)) 

128 » plot([0,2*pi],[0,0]) 

129 » hAxes = gca; 

130 » hCurve = hAxes.Children 

131 hCurve = 

132 3x1 Line array: 

133 

134 Line 

135 Line 

136 Line 

137 » delete(hCurve(1)) 

138 » delete(hCurve(2)) 

139 » delete(hAxes) 

140 » delete(gcf) 
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File Edit View Insert Tools Desktop Window Help 


°j a a k \ ®jc • a □ b i h 


jaixi 




Table 5.1 Graphics Objects 

Function 

Description 

hf = figure 

Create figure window 

ha = axes 

Create axes object 

hr = groot 

Get handle of root object 

hf = gcf 

Get handle of current figure 

ha = gca 

Get handle of current axes 

ho = geo 

Get handle of current object 

v = get(h,property) 

Get graphics object properties 

set(h,name,value) 

Set graphics object properties 

delete(h) 

Delete objects 

Details and More: Help>MATLAB>Graphics>Graphics Objects 
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5.2 Graphics Objects Properties 


^ Inspector: matlab. graphics, chart.pruni... 


f: [IT t: •: 


AlignVertexCenters 

r Off 


±. 

BeingDeleted 

new 



BusyAction 

queue 

1 


ButtonDownFcn 


* 


Clipping 

I? On 



El Color 

<> 1—1 



CreateFcn 


* 


DeleteFcn 


J> 


DisplayName 




Handle Visibility 

on 

1 


HitTest 

[7 On 



Interruptible 

17 On 



LineStyle 


- 

LineWidth 

0.5 

> 

Marker 

none 


33 MarkerEdgeColor 

<$> l*>?l auto 



3 MarkerFaceColor 

F5?l none 



MarkerSce 

6.0 

#1 


PirVableParts 
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z\ 


^jnj xj 
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^□Jxj 

File Edit View Insert 

Tools Detug Desktop 

Window Help 

* X 

10 A & \[k\ 

\ O ® € 

^ • | Q | □ 

ffl m □ & n 


Figure 1 




[8] Output of get (hCurve). 

Alphamap 

[1x64 double] 

AlignVertexCenters 

'off' 

Annotation 

[lxl ...] 

BeingDeleted 

'off' 

BusyAction 

' queue ' 

ButtonDownFcn 

' ' 

Children 

[] 

Clipping 

' on ' 

Color 

[0 0.4470 0.7410] 

CreateFcn 

' ' 

DeleteFcn 

' ' 

DisplayName 

1 1 

HandleVisibility 

' on ' 

HitTest 

' on' 

Interruptible 

' on' 

LineStyle 


LineWidth 

0.5000 

Marker 

'none ' 

MarkerEdgeColor 

' auto ' 

MarkerFaceColor 

' none ' 

MarkerSize 

6 

Parent 

[lxl Axes] 

PickableParts 

' visible ' 

Selected 

'off' 

SelectionHighlight 

' on' 

Tag 

' ' 

Type 

' line ' 

UIContextMenu 

[] 

UserData 

[] 

Visible 

' on ' 

XData 

[1x100 double] 

XDataMode 

'manual ' 

XDataSource 

' ' 

YData 

[1x100 double] 

YDataSource 

' ' 

ZData 

[1x0 double] 

ZDataSource 



[9] Output of get (groot). 

CallbackObject: 

[0x0 GraphicsPlaceholder] 

Children: 

[0x0 GraphicsPlaceholder] 

CurrentFigure: 

[0x0 GraphicsPlaceholder] 

FixedWidthFontName: 

'Courier New' 

HandleVisibility: 

' on' 

MonitorPositions: 

[1 1 2560 1440] 

Parent : 

[0x0 GraphicsPlaceholder] 

PointerLocation: 

[2232 543] 

ScreenDepth: 

32 

ScreenPixelsPerlnch : 

72 

ScreenSize: 

[1 1 2560 1440] 

ShowHiddenHandles : 

' off ' 

Tag: 

' ' 

Type: 

' root' 

Units: 

'pixels' 

UserData: 

[] 
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[10] Output of get (gcf ). 


Alphamap 

[1x64 double] 

BeingDeleted 

' off ' 

BusyAction 

' queue ' 

ButtonDownFcn 

' ' 

Children 

[lxl Axes] 

Clipping 

' on ' 

CloseRequestFcn 

'closereq' 

Color 

[0.94 0.94 0.94] 

Colormap 

[64x3 double] 

CreateFcn 

' ' 

CurrentAxes 

[lxl Axes] 

CurrentCharacter 

' ' 

CurrentObj ect 

[] 

CurrentPoint 

[0 0] 

DeleteFcn 

' ' 

DockControls 

' on' 

FileName 

' ' 

GraphicsSmoothing 

' on ' 

HandleVisibility 

' on ' 

IntegerHandle 

' on ' 

Interruptible 

' on ' 

InvertHardcopy 

' on ' 

KeyPressFcn 

' ' 

KeyReleaseFcn 

' ' 

MenuBar 

'figure ' 

Name 

' ' 

NextPlot 

'add' 

Number 

1 

NumberTitle 

' on ' 

PaperOrientation 

' portrait ' 

PaperPosition 

[0.2500 2.5000 8 6] 

PaperPositionMode 

' manual ' 

PaperSize 

[8.5000 11] 

PaperType 

' usletter ' 

PaperUnits 

' inches ' 

Parent 

[lxl Root] 

Pointer 

' arrow ' 

PointerShapeCData 

[16x16 double] 

PointerShapeHotSpot 

[1 1] 

Position 

[520 378 560 420] 

Renderer 

'opengl' 

RendererMode 

'auto' 

Resize 

' on' 

SelectionType 

'normal' 

SizeChangedFcn 

' ' 

Tag 

' ' 

ToolBar 

'auto' 

Type 

'figure' 

UIContextMenu 

[] 

Units 

'pixels' 

UserData 

[] 

Visible 

' on' 

WindowButtonDownFcn 


WindowButtonMotionFcn 


WindowButtonUpFcn 


WindowKeyPressFcn 


WindowKeyReleaseFcn 


WindowScrollWheelFcn 


WindowStyle 

'normal' 


[11] Output of get (gca ) (Continued on next page). 

ALim 

[0 1] 

ALimMode 

' auto ' 

ActivePositionProperty 

' outerposition ' 

AmbientLightColor 

[1 1 1] 

BeingDeleted 

' off ' 

Box 

' on ' 

BoxStyle 

' back ' 

BusyAction 

' queue ' 

Bu11onDownFc n 

' ' 

CLim 

[0 1] 

CLimMode 

'auto' 

CameraPosition 

[3.5000 0 17.3205] 

CameraPositionMode 

' auto' 

CameraTarget 

[3.5000 0 0] 

CameraTargetMode 

' auto ' 

CameraUpVector 

[0 1 0] 

CameraUpVectorMode 

' auto ' 

CameraViewAngle 

6.6086 

CameraViewAngleMode 

' auto ' 

Children 

[lxl Line] 

Clipping 

' on ' 

ClippingStyle 

' 3dbox ' 

Color 

[i i i] 

ColorOrder 

[7x3 double] 

ColorOrderIndex 

2 

CreateFcn 

' ' 

CurrentPoint 

[2x3 double] 

DataAspectRatio 

[3.5000 1 1] 

DataAspectRatioMode 

' auto ' 

DeleteFcn 

' ' 

FontAngle 

' normal ' 

FontName 

' Helvetica ' 

FontSize 

10 

FontSmoothing 

' on ' 

FontUnits 

' points ' 

FontWeight 

' normal ' 

GridAlpha 

0.1500 

GridAlphaMode 

' auto ' 

GridColor 

[0.15 0.15 0.15] 

GridColorMode 

'auto' 

GridLineStyle 


HandleVisibility 

' on' 

HitTest 

' on' 

Interruptible 

' on' 

LabelFontSizeMultiplier 

1.1000 

Layer 

'bottom' 

LineStyleOrder 


LineStyleOrderIndex 

1 

LineWidth 

0.5000 

MinorGridAlpha 

0.2500 

MinorGridAlphaMode 

'auto' 

MinorGridColor 

[0.10 0.10 0.10] 

MinorGridColorMode 

'auto' 

MinorGridLineStyle 

' : ' 

NextPlot 

'replace' 

OuterPosition 

[0011] 

Parent 

[lxl Figure] 
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[12] Output of get (gca) (Continued). 


PickableParts 

'visible' 


PlotBoxAspectRatio 

[1 0.7903 0.7903] 


PlotBoxAspectRatioMode 

'auto' 


Position 

[0.1300 0.1100 0.7750 0.8150] 


Projection 

'orthographic' 


Selected 

' off' 


SelectionHighlight 

' on' 


SortMethod 

'childorder' 


Tag 

' ' 


TickDir 

' in' 


TickDirMode 

'auto' 


TickLabellnterpreter 

' tex' 


TickLength 

[0.0100 0.0250] 


Tightlnset 

[0.0506 0.0532 0.0071 0.0202] 


Title 

[lxl Text] 


TitleFontSizeMultiplier 

1.1000 


TitleFontWeight 

'bold' 



Type 

'axes' 

[13] Output of get (gca) (Continued). # 

UIContextMenu 

[ ] 


Units 

'normalized' 

ZDir: 'normal' 

UserData 

[ ] 

ZGrid: 'off' 

View 

[0 90] 

ZLabel: [lxl Text] 

Visible 

'on' 

ZLim: [-1 1] 

XAxisLocation 

'bottom' 

ZLimMode: 'auto' 

XColor 

[0.1500 0.1500 0.1500] 

ZMinorGrid: 'of f' 

XColorMode 

'auto' 

ZMinorTick: 'off' 

XDir 

'normal' 

ZScale: 'linear' 

XGrid 

' off' 

ZTick: [-101] 

XLabel 

[lxl Text] 

ZTickLabel: '' 

XLim 

r o 71 

ZTickLabelMode: 'auto' 

XLimMode 

L w / j 

'auto' 

ZTickLabelRotation: 0 

XMinorGrid 

' off' 

ZTickMode: 'auto' 

XMinorTick 

' off' 



XScale 

'linear' 


XTick 

[01234567] 


XTickLabel 

{8x1 cell} 


XTickLabelMode 

'auto' 


XTickLabelRotation 

0 


XTickMode 

'auto' 


YAxisLocation 

'left' 


YColor 

[0.1500 0.1500 0.1500] 


YColorMode 

'auto' 


YDir 

'normal' 


YGrid 

'off' 


YLabel 

[lxl Text] 


YLim 

[-i i] 


YLimMode 

'auto' 


YMinorGrid 

'off' 


YMinorTick 

'off' 


YScale 

'linear' 


YTick 

CN 

o 

o 

CN 

o 

1 

o 

1 

VO 

o 

1 

00 

o 

1 

i-H 

1 

0.4 0.6 0.8 1] 


YTickLabel 

{llxl cell} 


YTickLabelMode 

'auto' 


YTickLabelRotation 

0 


YTickMode 

'auto' 


ZColor 

[0.1500 0.1500 0.1500] 


ZColorMode 

'auto' 
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5.3 Figure Objects 

r ; 

Example05_03.m: Figures 

[1] The following commands demonstrate some important properties of a Figure object. Carefully observe the outcome 
of each command. 

1 clear 

2 scrsz = get(groot, 'ScreenSize'); 

3 hi = figure; 

4 hi.Position = [20, 60, scrsz(3)/3, scrsz(4)/2]; 

5 hi.Name = 'Bottom-left Figure Window'; 

6 h2 = figure; 

7 h2.Visible = 'off'; 

8 h2.Units = 'normalized'; 

9 h2.Position = [0.1, 0.2, 0.3, 0.4]; 

10 h2.Visible = 'on'; 

11 h2.Color = [0.8, 0.8, 0.8]; 

12 h2.Name = 'A Window of Gray Background'; 

13 h2.NumberTitle = 'off'; 

14 h2.ToolBar = 'none'; 

15 h2.MenuBar = 'none'; 

16 delete(hl) 

17 delete(h2) 
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l*»JL,UIU.M,!lfflHj>^glT ^jnj xj 

File Edit View Insert Tools Desktop Window Help ^ 


'Jed 




s, © ® m *z 



Table 5.3 Figure Properties 

Properties 

Description 

Color 

Background color 

MenuBar 

Menu bar display 

ToolBar 

Toolbar display 

Name 

Title 

NumberTitle 

Display of title number 

Position 

Position and size of drawable area 

Units 

Units of measurement (pixels) 

Visible 

Figure window visibility 

Resize 

Resize mode (on) 

Details and More: 

Help>MATLAB>Graphics> Graphics Objects>Graphics Object Properties> Top-Level Object>Figure Properties 
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5.4 Axes Objects 


Example05_04a.m: Axes Properties 


[1] An Axes object includes not only the x-axis and y-axis and their tick marks and labels, but also everything drawn on 
the Axes. The following commands demonstrate some important properties of Axes objects. Observe the outcome of 
each command. 

1 clear 

2 h = axes; 

3 xlabel('Time (sec)'); 

4 ylabel('Displacement (mm)'); 

5 title('Displacement vs. Time'); 

6 axis([0, 20, 0 , 10000]); 

7 grid on 

8 box on 

9 h.YScale = 'log'; 

10 h.XTick = [0, 5 , 10 , 15 , 

11 h.XTickLabel = {'O','!", 

12 h.FontSize = 11; 

13 delete(h) 

14 delete(gcf) 


20 ]; 

2T' , '3T' , '4T'}; 


^jnjxj 


Fite Edit View Insert Took Desktop Window Help 


I Id A fe \ -w P ® ' 1 Q 1 □ ICI 
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E 
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c 

CD 

E 

8 
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Displacement vs. Time 


2T 

Time (sec) 
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Example05_04b.m: Overlapping Axes 

[4] The following commands demonstrate multiple axes in a figure. 

15 clear 

16 t = linspace(0,0.1); w = 50; 

17 y = sin(w*t); 

18 v = w*cos(w*t); 

19 yyaxis left 

20 hLinel = plot(t, y); 

21 xlabel('Time (sec)') 

22 ylabel('Displacement (mm)') 

23 yyaxis right 

24 hLine2 = plot(t, v) ; 

25 ylabel('Velocity (mm/s)') 

26 delete(hLinel) 

27 delete(hLine2) 

28 delete(gca) 

29 delete(gcf) 

V_ J 
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Example05_04c.m: Axes Scaling 

[7] The following commands demonstrate some additional Axes options. 

30 clear 

31 t = linspace(0,2*pi); 

32 plot(cos(t), sin(t)) 

33 axis equal 

34 limits = axis; 

35 axis square 

36 axis([limits(1),limits(2),limits(1), limits(2)]) 

37 delete(gca) 

38 delete(gcf) 

v_ J 
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^jnjx] 
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Example05_04d.m: Subplots 

[13] The following commands demonstrate subplots in a figure. —» 


39 

clear 


40 

t = linspace(0,0.1); w = 50; 


41 

y = sin(w*t); 


42 

v = w*cos(w*t); 


43 

a = -w*w*sin(w*t); 


44 

hi = subplot(2,2,1); 


45 

plot(t,y), xlabel('Time'), ylabel( 

'Displacement') 

46 

h2 = subplot(2,2,2); 


47 

plot(t,v), xlabel('Time'), ylabel( 

'Velocity') 

48 

h3 = subplot(2,2,3); 


49 

plot(t,a), xlabel('Time'), ylabel( 

'Acceleration') 

50 

h4 = subplot(2,2,4); 


51 

plot(y,a), xlabel('Displacement'), 

ylabel('Acceleration') 

52 

delete(hi) 


53 

delete(h2) 


54 

delete(h3) 


55 

delete(h4) 


56 

delete (gcf) 
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Table 5.4a Axes Functions 

Functions 

Description 

ha = axes 

Create axes graphics object 

axis(limits) 

Set axis limits 

axis equal 

Use the same length for the data units along each axis 

axis square 

Use the same length for the axis lines 

box on 

Display axes box outline 

ha = gca 

Get current axes 

grid on 

Display of grid lines 

title(text) 

Title for axes 

xlabel(text) 

Label x-axis 

ylabel(text) 

Label y-axis 

yyaxis right 

Specify the active side for the y-axis 


Table 5.4b Axes Properties 

Properties 

Description 

FontSize 

Font size (10 points) 

Position 

Position and size of axes 

Units 

Units of measurement (normalized) 

XLim, YLim, ZLim 

Minimum and maximum axis limits 

XScale, YScale, ZScale 

Scale of values along axis 

XTick, YTick, ZTick 

Tick mark locations 

XTickLabel, YTickLabel, ZTickLabel 

Tick mark labels 

Details and More: Help>MATLAB>Graphics>Graphics Objects> Graphics Object Properties>Axes Properties 
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5.5 Line Objects 



Approximation of sin(x) 



( \ 

Example05_05a.m 

[2] The following commands demonstrate the use of line styles, colors, and marker types. —» 

1 clear 

2 xl = [-5 -4-3-2-101234 5]; 

3 yl = [23.9, 18.5, 10.7, 4.31, -0.26, -0.87, 0.82, 4.79, 7.67, 13.7, 23.5]; 

4 p = polyfit(xl, yl, 2) 

5 x2 = linspace(-5,5); 

6 y2 = polyval(p, x2); 

7 h = plot(xl, yl, 'or', x2, y2, '-k'); 

8 delete(h(1)) 

9 delete(h(2)) 

10 delete(gca) 

11 delete(gcf) 


v 
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Example05_05b.m 

[5] The following commands demonstrate some 
additional line properties. 

12 clear 

13 x = linspace(0,2*pi); 

14 y = sin(x); 

15 h = plot(x, y); 

16 axis([0, 2*pi, -10, 10]) 

17 h.YData = 5*sin(x); 

18 h.YData = 10*sin(x); 

v___ J 
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Table 5.5a Line Styles, Colors, and Marker Types 

Line style 

Color 

Marker Type 

Symbol 

Description 

Symbol 

Description 

Symbol 

Description 

Symbol 

Description 

- 

Solid 

r 

Red 

+ 

Plus sign 

* 

Up triangle 

— 

Dashed 

g 

Green 

o 

Circle 

V 

Down triangle 

: 

Dotted 

b 

Blue 

* 

Asterisk 

> 

Right triangle 


Dashed-dot 

c 

Cyan 

. 

Point 

< 

Left triangle 



m 

Magenta 

X 

Cross 

P 

Pentagram 



y 

Yellow 

s 

Square 

h 

hexagram 



k 

Black 

d 

Diamond 





w 

White 





Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Line Plots>LineSpec (Line Specification) 


Table 5.5b Line Functions (2-D) 

Functions 

Description 

plot(x,y,lineSpec) 

2-D line plot 

loglog(x,y,lineSpec) 

Log-log scale plot 

semilogx(x,y,lineSpec) 

Semilogarithmic plot 

semilogy(x,y,lineSpec) 

Semilogarithmic plot 

fplot(fun,linsSpec) 

Plot expression or function (2-D) 

fimplicit(fun,lineSpec) 

Plot 2-D implicit function 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Line Plots 

Table 5.5c Line Properties 

Properties 

Description 

Color 

Line color 

LineStyle 

Line style 

LineWidth 

Line width (default 0.5) 

Marker 

Marker symbol 

MarkerEdgeColor 

Marker outline color 

MarkerFaceColor 

Marker fill color 

MarkerSize 

Marker size (default 6) 

XData 

x values 

YData 

y values 

ZData 

z values 

Details and More 

Help>MATLAB>Graphics>Graphics Objects> Graphics Object Properties>Chart Objects>Chart Line Properties 
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5.6 Text Objects 

r 

Example05_06a.m 

[1] The following commands demonstrate some important properties of Text objects. Observe the outcome of each 
command. 

1 clear 

2 alpha = linspace(0, pi); 

3 phi = sin(alpha).*cos(alpha); 

4 plot(alpha, phi) 

5 axis([0, pi, -1, 1]) 

6 hx = xlabel('\alpha (rad)')? 

7 hy = ylabel('\phi(\alpha)'); 

8 ht = title('\phi = sin(\alpha)\timescos(\alpha)'); 

9 hx.FontSize = 16; 

10 hy.FontSize = 16; 

11 ht.FontSize = 18; 

12 [value, index] = max(phi); 

13 hmax = text(alpha(index), value, ['Max \phi = ', num2str(value)]); 

14 hmax.HorizontalAlignment = 'center'; 

15 hmax.VerticalAlignment = 'bottom'; 

16 [value, index] = min(phi); 

17 hmin = text(alpha(index), value, ['Min \phi = ', num2str(value)]); 

18 hmin.HorizontalAlignment = 'center'; 

19 hmin.VerticalAlignment = 'top'; 

20 delete(hx) 

21 delete(hy) 

22 delete(ht) 

23 delete(hmax) 

24 delete(hmin) 

25 delete(gcf) 
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| -ini x| 

File Edit View Insert Tools Desktop Window Help 
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a (rad) 



r 

Example05_06b.m 

[4] The following commands demonstrate a more sophisticated way of using function text. The dimmed lines (lines 
26-32) are copied from Example05_05a.m (page 224). 


26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 


clear 

xl = [-5 -4-3-2-101234 5]; 

yl = [23.9, 18.5, 10.7, 4.31, -0.26, -0.87, 0.82, 4.79, 7.67, 13.7, 23.5]; 
p = polyfit(xl, yl, 2) 
x2 = linspace(-5,5); 
y2 = polyval(p, x2); 

h = plot(xl, yl, 'or', x2, y2, '-k'); 

for k = 1:length(xl) 

txt{k} = sprintf('(%g,%g)', xl(k), yl(k)); 

end 

text(xl, yl-0.5, txt, ... 

'HorizontalAlignment', 'center', 'VerticalAlignment', 'top') 
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Table 5.6a Geek Letters and Math Symbols 

Symbol 

Syntax 

Symbol 

Syntax 

Symbol 

Syntax 

a 

\alpha 

a 

\sigma 

X 

\times 

p 

\beta 

T 

\tau 

+ 

\div 

7 

\gamma 

<t> 

\phi 

0 

\circ 

§ 

\delta 

X 

\chi 


\surd 

£ 

\epsilon 

¥ 

\psi 

-> 

\rightarrow 

<r 

\zeta 

(0 

\ omega 

<— 

Meftarrow 

V 

\eta 

r 

\Gamma 

T 

\uparrow 

e 

\theta 

A 

\ Delta 

1 

\downarrow 

X 

\lamda 

n 

\Pi 

(bold face) 

\bf 

p 

\mu 

s 

\Sigma 

(italic) 

\it 

V 

\nu 

o 

\Phi 

(remove) 

\rm 


\xi 

'F 

\Psi 

(superscript) 

* 

71 

\pi 

Q 

\ Omega 

(subscript) 


p 

\rho 





Details and More: Help>MATLAB>Graphics>Graphics Objects>Graphics Object Properties> 

Prim itive Objects > Text Properties >In terpreter 
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Table 5.6b Text Functions 

Functions 

Description 

text(x,y,text) 

Create axes graphics object 

title(text) 

Title for axes 

xlabel(text) 

Label x-axis 

ylabel(text) 

Label y -axis 

Details and More: Help>MATLAB>Graphics>Formatting and Annotation>Titles and Labels 


Table 5.6c Text Properties 

Properties 

Description 

Color 

Text color (black) 

FontName 

Font name (Helvetica) 

FontSize 

Font size (10 points) 

HorizontalAlignment 

Horizontal alignment (left) 

Position 

Position of text 

String 

Text to display 

Units 

Position and extent units (data) 

VerticalAlignment 

Vertical alignment (middle) 

Details and More: 

Help>MATLAB>Graphics>Graphics Objects>Graphics Object Properties>Primitive Objects>Text Properties 
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5.7 Legend Objects 


r \ 

Example05_07.m: Legends 

[1] We’ve shown in Example02_12e.m (page 112) that, when a Figure contains multiple curves, adding a Legend 
improves the readability of the Figure. The following commands demonstrate the properties of Legend objects. The 
dimmed lines (lines 1-14) are duplicated from Example02_12e.m. 

1 clear 

2 x = linspace(0,pi/2,20); 

3 n = 4; 

4 k = (1: n) ; 

5 [X, K] = meshgrid(x, k); 

6 sinx =cumsum(((-1). A (K-l)).*(X . A (2*K-1))./factorial(2*K-1)); 


plot(x*180/pi. 

sinx(1,:), 


x* 180/pi, 

sinx(2,:), 

'X-', ... 

x*180/pi. 

sinx(3,:), 

' * 1 

, ... 

x*180/pi. 

sinx(4,:), 

1 ^ ' 

o , ... 

x*180/pi. 

sin(x)) 



12 title('Approximation of sin(x)') 

13 xlabel('x (deg)') 

14 ylabel('sin(x) (dimensionless)') 

15 h = legend('1 term', '2 terms', '3 terms', '4 terms', 'Exact'); 

16 h.Position = [0.6, 0.2, 0.25, 0.2]; 

17 h.FontSize = 16; 

18 h.String{5} = 'sin(x)'; 

19 h.Box = 'off'; 

V_ J 
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Table 5.7a Legend Functions 

Functions 

Description 

legend(labels,name,value) 

Add legend to graph 

Details and More: » doc legend 


Table 5.7b Legend Properties 

Properties 

Description 

Box 

Box outline (on) 

FontSize 

Font size (9 points) 

Location 

Location of legend (northeast) 

Position 

Custom position and size 

String 

Legend entry description 

Units 

Position units (normalized) 

Details and More: 

Help>MATLAB>Graphics>Graphics Objects>Graphics Object Properties>Illustration Objects>Legend Properties 
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5.8 Bar Plots 

Example05_08.m: Bar Plots 

[1] The following commands demonstrate the creation of bar plots. Observe the outcome of each command. 

1 clear 

2 USA = [-6.3, -4.3, 0.1, 5.9, 12.1, 17.1, ... 

3 19.9, 18.9, 14.4, 7.7, 0.4, -4.8]; 


4 

hb = bar(USA); 


5 

ha = gca; 


6 

axis([0, 13, -30 

, 30]) 

7 

ha.XTickLabel = 

{'Jan', 'Feb' , 'Mar', 'Apr', 'May', 'Jun', ... 

8 


'July', 'Aug', 'Sept', 'Oct', 'Nov', 'Dec'}; 

9 

CAN = [-24.6, -23.3, 

-18.7, -9.8, -0.3, 7.2, ... 

10 

11.1, 9.5, 3. 

5, -4.4, -14.5, -21.5]; 

11 

GBR = [3.0, 3.0, 4.7 

, 6.7, 9.8, 12.8, ... 

12 

14.4, 14.3, 12.2, 9.5, 5.5, 3.9]; 

13 

y = [USA', CAN', GBR 

']? 

14 

delete(hb); 


15 

hold on 


16 

hb = bar(y); 


17 

hb(1).BarWidth = 

1.0; 

18 

hb(2).BarWidth = 

1.0; 

19 

hb(3).BarWidth = 

1.0; 

20 

title('Average Temperature (1961-1999)') 

21 

ylabel('Temperature 

(\circC) ' ) 

22 

legend('United States', 'Canada', 'United Kingdom', 'Location', 'best') 
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Table 5.8a Bar Functions 

Functions 

Description 

bar(y,width) 

Plot bar graph 

bar(y,name,value) 

Plot bar graph 

barh(y,width) 

Plot horizontal bar graph 

bar3(y,width) 

Plot 3-D bar graph 

bar3h(y,width) 

Plot horizontal 3-D bar graph 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Pie Charts, Bar Plots, and Histograms 


Table 5.8b Bar Properties 

Properties 

Description 

BarWidth 

Relative width of bars (0.8) 

BaseValue 

Baseline location 

EdgeColor 

Bar outline color 

FaceColor 

Bar fill color 

XData 

Bar locations 

YData 

Bar length 

Details and More: 

Help>MATLAB>Graphics>Graphics Objects>Graphics Object Properties>Chart Objects>Bar Properties 
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5.9 Pie Plots 

Example05_09.m: Pie Plots 

[1] It is estimated that, in 2008, the total CO 2 emission in the world was 29.85 Bt (billion tons), of which, in descending 
order, 7.03 Bt was produced by China, 5.46 Bt by United States, 1.74 Bt by India, 1.71 Bt by Russia, 1.21 Bt by Japan, 
and 0.79 Bt by Germany {Data source: http://data.worldbank.org/data-catalog/climate-change). The following script 
generates a Pie plot [2] that shows these data. 

1 clear 

2 world = 29.85; 

3 CHN = 7.03; USA = 5.46; IND = 1.74; 

4 RUS = 1.71; JPN = 1.21; DEU = 0.79; 

5 others = world - CHN - USA - IND - RUS - JPN - DEU; 

6 x = [CHN, USA, IND, RUS, JPN, DEU, others]; 

7 explode = [1, 1, 1, 1, 1, 1, 1]; 

8 countries = {'China', 'United States', 'India', ... 

9 'Russia', 'Japan', 'Germany', 'Other Countries'}; 

10 for k = 1:7 

11 labels{k} = [countries{k} , sprintf(' (%.If%%)', x(k)/world*100 )] ; 

12 end 

13 h = pie(x, explode, labels) 

14 h(2).FontSize = 12; 

15 h(4).FontSize = 12; 

16 h(6).FontSize = 12; 

17 h(8).FontSize = 12; 

18 h(10).FontSize = 12; 

19 h(12).FontSize = 12; 

20 h(14).FontSize = 12; 



lndia < 5 mia(^< 4 - 1% ) 
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1x14 graphics array: 

Columns 1 through 8 

Patch Text Patch Text Patch Text Patch Text 

Columns 9 through 14 

Patch Text Patch Text Patch Text 


Table 5.9a Pie Functions 

Functions 

Description 

pie(x, explode, labels) 

Pie chart 

pie3(x, explode, labels) 

3-D pie chart 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Pie Charts, Bar Plots, and Histograms 


Table 5.9b Patch Properties 

Properties 

Description 

FaceColor 

Patch fill color 

EdgeColor 

Patch outline color 

Details and More: 

Help>MATLAB>Graphics> Graphics Objects> Graphics Object Properties>Primitive Objects>Patch Properties 
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5.10 3-D Line Plots 


Example05_10.m: 3-D Line Plots 

[1] The function plot3 (x, y, z ) plots a 3-D line by connecting the following points: 

(x(k), y(k), z( k)); k = l, 2, ... 

The following commands create a 3-D line plot (see [3-5], this and next pages) using the following parametric equations 

x(t ) = e~ t/2 ° cos t , y(t) = e~ tl2Q sin t , z(t) = t 

1 clear 

2 z = linspace(0, 8*pi, 200); 

3 x = exp(-z/20).*cos(z); 

4 y = exp(-z/20).*sin(z); 

5 plot3(x,y,z) 

6 xlabel x, ylabel y, zlabel z 

7 axis([-l, 1, -l r If Of 8*pi]) 

8 h = gca; h.BoxStyle = 'full'; box on 

9 grid on 

10 axis vis3d 

V_ J 
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Table 5.10a 3-D Line Plot Functions 

Functions 

Description 

plot3(x,y,z,lineSpec) 

Plot 3-D lines 

fplot3(funx,funy,funz,lineSpec) 

3-D parametric curve plotter 

fimplicit3(fun,lineSpec) 

Plot 3-D implicit function 

axis vis3d 

Freeze the aspect ratio properties. 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Line Plots 


Table 5.10b Additional Axes Properties 

Properties 

Description 

BoxStyle 

Box style (back) 

Details and More: 

Help>MATLAB>Graphics> Graphics Objects>Graphics Object Properties> Top-Level Objects>Axes Properties 
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5.11 Surface and Mesh Plots 


Example05_l la.m: Surface and Mesh Plots 

[1] The function surf (X,Y,Z) generates a surface by connecting the points 

Y(iJ),Z(iJ )); i = 1, 2, j = 1, 2, ... 

and then filling with faces between the edges. By default, each face is colored according to the current colormap (see 
Table 5.11a, page 243), and the edges are black-colored. 

The following commands generate a surface described by 

z(x,y) = sin x- cosy (a) 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 


clear 

x = linspace(0,2*pi,100); 
y = linspace(0, pi, 50); 

[X,Y] = meshgrid(x, y); 

Z = sin(X) .* cos(Y); 

surf(X, Y, Z) 

xlabel x, ylabel y, zlabel z 
h = gca; 

axis([0, 2*pi, 0, pi, -1, 1]) 
h.XTick = [0, pi/2, pi, 3*pi/2, 2*pi]; 
h.YTick = [0, pi/2, pi]; 

h.XTickLabel = {'O', '\pi/2', '\pi', '3\pi/2', '2\pi'}; 

h.YTickLabel = {'O', '\pi/2', '\pi'}; 

axis vis3d 
axis equal 

h.BoxStyle = 'full'; 
box on 
grid on 
colorbar 
colormap hot 

hs.FaceAlpha = 0.2; 
hs.EdgeColor = 'none'; 


J 
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( ^ 

Example05_l lb.m 

[9] Consider a spherical surface of radius 2 a centered at the origin and a cylindrical surface of radius a and length 4a, 
centered at (a, 0, 0). The intersection of the two surfaces is a curve given by the following parametric equations: 

x = a(l + cost), y = asint, z = 2asin(t/2) (b) 

The following commands plot the two surfaces and the intersecting curve (see [11], next page). 

23 clear 

24 a = 1; 

25 [X,Y,Z] = sphere; 

26 surf(2*a*X,2*a*Y,2*a*Z) 

27 hold on 

28 [X,Y,Z] = cylinder; 

29 surf(a*X+a,a*Y,4*a*Z-2*a) 

30 shading interp 

31 t = linspace(0,4*pi); 

32 x = a*(l+cos(t)); 

33 y = a*sin(t); 

34 z = 2*a*sin(t/2); 

35 plot3(x,y,z) 

36 axis equal 

37 axis vis3d 

38 xlabel x, ylabel y, zlabel z 

39 view(45,30) 

v_ J 
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Table 5.11a Colormaps 

Colormap Name 

Color Scale 

parula 


jet 


hsv 


hot 


cool 


spring 


summer 


autumn 


winter 


gray 


bone 


copper 


pink 


lines 

i 

j 

colorcube 

iiirmin i hh 

prism 


flag 

white 


Details and More: Type » doc colormap 
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Table 5.11b Surface Functions 

Functions 

Description 

surf(X,Y,Z) 

Shaded surface plot 

mesh(X,Y,Z) 

Mesh plot 

fsurf(funx,funy,funz) 

Surface plotter 

colorbar 

Display color scale 

colormap map 

Set current colormap 

[X,Y,Z] = cylinder 

Generate cylinder 

[X,Y,Z] = sphere 

Generate sphere 

[X,Y,Z] = ellipsoid 

Generate ellipsoid 

[X,Y,Z] = peaks 

Generate a surface of ’’peaks” 

shading mode 

Set color shading properties 

view(az,el) 

View point specification 

Details and More: 

Help>MATLAB>Graphics>2-D and 3-D Plots>Surface, Volumes, and Polygons>Surface and Mesh Plots 


Table 5.11c Surface Properties 

Properties 

Description 

EdgeColor 

Edge line color 

FaceAlpha 

Face transparency 

FaceColor 

Face color 


Details and More: 

Help>MATLAB>Graphics>Graphics Objects> Graphics Object Properties>Chart Objects>Chart Surface Properties 
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5.12 Contour Plots 





246 Chapter 5 Data Visualization: Plots 
























5.12 Contour Plots 247 




Table 5.12a Contour Functions 

Functions 

Description 

[C,h] = contour(X,Y,Z,values) 

Contour plot 

[C,h] = contourf(X,Y,Z,values) 

Filled contour plot 

[c,h] = contour 3 (X,Y,Z,values) 

3-D contour plot 

clabel(C,h,values) 

Label contour plot 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Contour Plots 


Table 5.12b Contour Properties 

Properties 

Description 

ShowText 

Show contour line labels 

TextList 

Contour lines to label 


Details and More: 

Help>MATLAB>Graphics>Graphics Objects> Graphics Object Properties>Chart Objects>Contour Properties 
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5.13 Vector Plots 

Example05_13a.m: 2-D Vector Plots 

[1] The following commands generate a vector plot as shown in [3]. 

1 clear 

2 [X,Y,Z] = peaks; 

3 contour(X,Y,Z); 

4 hold on 

5 [U,V] = gradient(Z,0.2,0.2); 

6 quiver(X,Y,U,V,3) 

v_ J 
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Example05_13b.m: 3-D Vector Plots 

[4] The following commands generate a 3-D vector plot as shown in [6]. 

7 clear 

8 [X,Y,Z] = peaks; 

9 surf(X,Y,Z); 

10 limits = axis 

11 hold on 

12 [U,V,W] = surfnorm(X,Y, Z); 

13 quiver3(X,Y,Z,U,V,W) 

14 axis(limits) 

V_ ) 



3 


Table 5.13 Vector Plots Functions 

Functions 

Description 

quiver(X,Y,U,V,scale) 

2-D Vector plot 

quiver3(X,Y,Z,U,V,W,scale) 

3-D vector plot 

[U,V] = gradient(Z) 

Compute gradient 

[U,V,W] = surfnorm(X,Y,Z) 

Compute surface normals 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots> Vector Fields 













250 Chapter 5 Data Visualization: Plots 


5.14 Streamline Plots 

; 

Example05_14a.m: 2-D Streamlines 

[1] The script below generates a streamline plot for the flow described by a velocity field ( u , v), 

u(x,y ) = 0.3 +v 
v(x,y) = 0.4 — y 

1 clear 

2 x = 0:0.1:1; y = 0:0.1:1; 

3 [X,Y] = meshgrid(x,y); 

4 U = 0.3+X; V = 0.4-Y; 

5 quiver(X,Y,U,V) 

6 sx = [0:0.1:1, zeros(l,ll), 0:0.1:1]; 

7 sy = [zeros(1,11), 0:0.1:1, ones(l,ll)]; 

8 SL = stream2(X,Y, U,V, sx,sy); 

9 streamline(SL) 




Table 5.14 Streamline Plots Functions 

Functions 

Description 

streamline(SL) 

Streamline plot 

SL = stream2 ( X, Y, U,V, Sx,Sy) 

Calculate 2-D streamlines 

SL = stream3 (X,Y,Z, U,V,W, Sx,Sy,Sz) 

Calculate 3-D streamlines 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Surfaces, Volumes , and Polygons> 

Volume Visualization> Vector Volume Data 
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Example05_14b.m: 3-D Streamlines 

[4] The script below generates a 3-D streamline plot for the flow described by a 3-D velocity field (i/, v, w), 

u(x,y ) = 0.3 + x 
v(x,y) = 0.4 -y 
w = 0.5 -z 

10 clear 

11 x = 0:0.1:1; y = 0:0.1:1; z = 0:0.1:1; 

12 [X,Y,Z] = meshgrid(x,y,z); 

13 U = 0.3+X; V = 0.4-Y; W = 0.5-Z; 

14 % quiver3(X,Y,Z,U,V,W) 

15 sx = 0; 

16 sy = 0:0.1:1; 

17 sz = 0:0.1:1; 

18 [Sx, Sy, Sz] = meshgrid(sx,sy,sz); 

19 SL = stream3(X,Y,Z, U,V,W, Sx,Sy,Sz); 

20 streamline(SL) 

21 view(3), axis vis3d, box on 

22 xlabel('x'), ylabel('y'), zlabel('z') 

v_ ) 
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5.15 Isosurface Plots 


Example05_15.m: Isosurface Plots 

[1] Imagine a potential function V in 3-D space, 

V(x,y,z) = 0.2 + 0.3x + 0.4y + 0.5z + 0.5x 2 - 0.5/ - 0.5/ 

where 0<x<l,0<y< 1, and 0 < z < 1. An isosurface is a surface on which a function has a specific common value. 
The following commands generate an isosurface plot for the potential function V. 

1 clear 

2 x = 0:0.05:1; y = 0:0.05:1; z = 0:0.05:1; 

3 [X,Y,Z] = meshgrid(x, y,z ); 

4 V = 0.3*X+0.4*Y+0.5*Z+0.5*X. A 2-0.5*Y. A 2-0.5*Z. A 2; 

6 colorbar 

7 hold on 

8 for isovalue = 0.4:0.1:0.8 

9 isosurface(X,Y,Z,V, isovalue) 

10 end 

11 view(3), axis vis3d 

12 xlabel('x'), ylabel('y'), zlabel('z') 



Table 5.15 Isosurface Plots Functions 

Functions 

Description 

isosurface(X,Y,Z,V,isovalue) 

Isosurface plot 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Surfaces, Volumes, and Polygons> 

Volume Visualization>Scalar Volume Data 
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Chapter 6 

Animations, Images, Audios, and Videos 


Animation is often the best way 
than a static picture to present 
time-dependent data. An 
engineer often needs to deal 
with an image file, an audio 
file, or a video file. MATLAB 
provides many functions that 
can open and operate on 
various formats of image files, 
audio files, and video files. 


6.1 Animation of Line Plots: Comet 257 

6.2 Stream Particles Animations 258 

6.3 Movie: Animation of an Engine 260 

6.4 Indexed Images 262 

6.5 Tme Color Images 264 

6.6 Audios 267 

6.7 Videos 270 

6.8 Example: Statically Determinate Tmsses (Version 4.0) 272 

6.9 Additional Exercise Problems 275 
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6.1 Animation of Line Plots: Comet 


Example06_01 .in 

[1] We've demonstrated an animation of a 2-D line plot in line 37, Example01_18.m, page 55. The following commands 
demonstrate an animation of a 3-D line plot, which was defined in 5.10[1], page 237. 


1 clear 

2 view(3) 

3 axis([-l, 1, -l r If Of 8*pi]) 

4 xlabel x, ylabel y, zlabel z 

5 h = gca; h.BoxStyle = 'full'; box on 

6 grid on 

7 axis vis3d 

8 hold on 

9 z = linspace(0, 8*pi, 200); 

10 x = exp(-z/20).*cos(z); 

11 y = exp(-z/20).*sin(z); 

12 comet3(x,y,z) 



Table 6.1 Animated Line Plots Functions 

Functions 

Description 

comet(x,y) 

Animate 2-D line plots. 

comet3(x,y,z) 

Animate 3-D line plots. 

animatedline(x , y) 

Create animated line (2-D) 

animatedline(x,y,z) 

Create animated line (3-D) 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Animation 
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6.2 Stream Particles Animations 


r a 

Example06_02a.m: Animation of 2-D Streamlines 

[1] The following commands perform an animation of the flow 
described in 5.14[1], page 250. The dimmed lines (lines 1-9) are copied 
from Example05_14a.m, page 250. 


1 

clear 


2 

x = 0:0.1:1; y = 0:0.1: 

i; 

3 

[X,Y] = meshgrid(x,y); 


4 

U = 0.3+X; V = 0.4-Y; 


5 

quiver(X,Y,U,V) 


6 

sx = [0:0.1:1, zeros(1, 

O 

O 

i—1 
t—1 

7 

sy = [zeros(1,11), 0:0. 

1:1, ones 

8 

SL = stream2(X, Y, U,V, 

sx,sy); 

9 

streamline(SL) 


10 

streamparticles(SL, ... 


11 

'Animate', 5, ... 


12 

'FrameRate', 30, .. 

. 

13 

'ParticleAlignment' 

, 'on') 

14 

sx = zeros(1,11); 


15 

sy = 0:0.1:1; 


16 

SL = stream2(X,Y, U, V, 

sx, sy); 

17 

streamparticles(SL, ... 


18 

'Animate', 5, ... 


19 

'FrameRate', 30, .. 

• 

20 

'ParticleAlignment' 

, 'on') 
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; \ 

Example06_02b.m: Animation of 3-D Streamlines 

[5] The following commands perform an animation of the flow described in 5.14[4], page 251. The dimmed lines (lines 
21-33) are copied from Example05_14b.m, page 251. 


21 

clear 


22 

i—i 

i—i 

o 

o 

II 

>1 

1—1 

1—1 

o 

o 

II 

X 

z = 0 : 0.1:1; 

23 

[X,Y,Z] = meshgrid(x,y,z); 


24 

U = 0.3+X; V = 0.4-Y; W = 

0.5-Z; 

25 

% quiver3(X,Y,Z,U,V,W) 


26 

sx = 0; 


27 

sy = 0 : 0.1:1; 


28 

sz = 0:0.1:1; 


29 

[Sx, Sy, Sz] = meshgrid(sx 

:, sy, sz); 

30 

SL = stream3(X,Y,Z, U,V,W, 

Sx,Sy,Sz); 

31 

streamline(SL) 


32 

view(3), axis vis3d, box on 

33 

xlabel('x'), ylabel('y'), 

zlabel('z') 

34 

streamparticles(SL, ... 


35 

'Animate', 5, ... 


36 

'FrameRate', 30, ... 


37 

'ParticleAlignment', ' 

on' ) 


V_ J 



m 


Table 6.2 Stream Particles Functions 

Functions 

Description 

streamparticles(SL,name,value) 

Plot stream particles 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Surfaces, Volumes, and Polygons> 

Volume Visualization> Vector Volume Data 
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6.3 Movies: Animation of an Engine 


Example06_03.m: Ani mation of an Engine 

| [1] This program creates a movie that animates the motion of an engine cylinder as shown in [3-7] (next page) and saves 
the movie as an video file, in default format (AVI). Observe the outcome of each command. 

1 clear 
8 for k = lsn 

29 Frames(k) = getframe; 


31 end 

32 movie(Frames, 5, 30) 

33 videoObj = VideoWriter('Engine'); 

34 open(videoObj); 

35 writeVideo(videoObj, Frames); 

36 close(videoObj); 
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A 



Table 6.3 Animated Line Plots Functions 

Functions 

Description 

movie(Frames,n,fps) 

Play movie frames 

frame = getframe 

Capture axes or figure as movie frame 

videoObj = VideoWriter(filename) 

Create object to write video files 

writeVideo(videoObj,Frames) 

Write video data to file 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Animation 























262 Chapter 6 Animations, Images, Audios, and Videos 


6.4 Indexed Images 


r > 

Example06_04a.m: Indexed Images 

[1] MATLAB supports two types of images: indexed and 
true-color. The following commands demonstrate the 
display of an indexed image. We’ll discuss true-color 
images in the next section. 


1 clear 

2 load earth 

3 image(X) 

4 colormap(map) 

5 axis image 

v j 


Workspace_®_ 

Name a Value 

B“j map 64x3 double 

EB X 257x250 double 
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Example06_04b.m: Colormaps and Images 

[7] The following script demonstrates the creation of a colormap of 4 colors, the 
creation of a 2-by-4 image, and some operations of the image. Observe the outcome 
of each command. 

6 clear 

7 MyMap = [1, 0, 0; % 1. Red 

8 0, 1, 0; % 2. Green 

9 0, 0, 1; % 3. Blue 

10 1, 1, 1]; % 4. White 

11 MyImage = [1, 2, 3, 4; 

12 4, 3 , 2, 1]; 

13 image(MyImage) 

14 colormap(MyMap) 

15 axis image 

16 delete(gcf) 

17 save('Datafile06_04b','Mylmage','MyMap') 

18 clear 

19 load('Datafile06_04b') 

20 image(Mylmage) 

21 co1ormap(MyMap) 

22 axis image 



J 
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6.5 True-Color Images 


Example06_05a.m: True Color Images 

[1] We saw the following commands in Section 1.13. It displays a true-color image [2]. Now we look into details of a 
true-color image. 

1 clear 

2 Photo = imread('peppers.png'); 

3 image(photo) 

4 axis image 

V_ ) 



Workspace ® 

Name a Value 

EB Photo 384xS12x3 utntS 
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Example06_05b.m: RGB Triplets 

[5] The following script demonstrates the creation of a 2-by-4 true-color image and some operations of the image. 


1 clear 


2 

A = zeros(2,4 

/ 3) 

r 




3 

A(l,1,1:3) = 

[1 

0 

0]; 

% 

Red 

4 

A( 1 ,2, 1:3) = 

[0 

1 

0]; 

% 

Green 

5 

A(l, 3,1:3) = 

[0 

0 

i]; 

% 

Blue 

6 

A(1,4,1:3) = 

[1 

1 

i]; 

% 

White 

7 

A(2, 1,1:3) = 

[1 

1 

i]; 

% 

White 

8 

A( 2,2, 1: 3) = 

[0 

0 

i]; 

% 

Blue 

9 

A( 2, 3 , 1:3) = 

[0 

1 

0]; 

% 

Green 

10 

A( 2,4,12 3 ) = 

[1 

0 

0]; 

% 

Red 

11 

image(A), axis image 




12 imwrite(A, 'Datafile06_05b.png') 

13 delete(gcf), clear 

14 B = imread('Datafile06_05b.png'); 

15 image(B), axis image 



Workspace 

® 

Workspace 


© 

Name a 

m A 

Value 

2x4x3 double 

Name a 

OjB 

Value 

2x4x3 uint8 
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Table 6.5a Supported Image File Formats 

Format 

Description 

BMP 

Microsoft Windows Bitmap 

GIF 

Graphics Interchange Files 

HDF 

Hierarchical Data Format 

JPEG 

Joint Photographic Experts Group 

PCX 

Paintbrush 

PNG 

Portable Network Graphics 

TIFF 

Tagged Image File Format 

XWD 

X Window Dump 

Details and More: Help>MATLAB>Graphics>Images> Working with Images in MATLAB Graphics. 


Table 6.5b Image Functions 

Functions 

Description 

colormap map 

Set current colormap 

image(A) 

Display image (indexed or true-color) 

[A,map] = imread(filename) 

Read image (indexed or true-color) from file 

imwrite(A,filename) 

Write true-color image to file 

imwrite(A,map, filename) 

Write indexed image to file 

info = imfinfo(filename) 

Get image information 

B = ind2rgb(A,map) 

Convert indexed image to true-color image 

Details and More: Help>MATLAB>Graphics>Images 
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6.6 Audios 


Example06_06a.m: Audios 

[1] Following commands demonstrate the play and some other operations of an audio data. Observe the outcome of 
each command. 

1 clear 

2 load handel 

3 sound(y, Fs) 

4 plot(y) 

5 audiowrite('handel.wav', y, Fs) 

6 delete(gcf), clear 

7 [y, Fs] = audioread('handel.wav'); 

8 plot(y) 

9 sound(y, Fs) 

% _ J 


Workspace 

® 

Name a 

Value 

EBfs 

8192 

ffly 

73113x1 double 
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Example06_06b.m: Audio Recording 

[5] Assuming your computer has an audio input device, this script records your voice, plays back the voice, saves it in a 
file, reads it from the file, plays back again, and finally plots the waves of the voice. Observe the outcome of each 
command. 

10 clear 

11 recObj = audiorecorder; 

12 menu('Start Recording ', 'OK'); 

13 record(recObj) 

14 menu('End recording', 'OK'); 

15 stop(recObj) 

16 play(recObj); 

17 y = getaudiodata(recObj); 

18 Fs = recObj.SampleRate; 

19 audiowrite('myvoice.wav', y, Fs) 

20 clear 

21 [y, Fs] = audioread('myvoice.wav'); 

22 sound(y, Fs) 

23 plot(y) 

V_ J 




xIO 4 
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Table 6.6a Supported Audio File Formats 

File Extension 

Format 

.wav 

WAVE 

• °gg 

OGG 

. f lac 

FLAC 

.mp4 

MPEG-4 

.m4a 

AAC 

Details and More: » doc audiowrite 


Table 6.6b Audio Functions 

Functions 

Description 

[y,Fs] = audioread(filename) 

Read audio file 

audiowrite(filename,y,Fs) 

Write audio file 

recObj = audiorecorder 

Create audiorecorder object 

y = getaudiodata(recObj) 

Retrieve recorded data 

record(recObj) 

Record to audiorecorder object 

play(recObj) 

Play audiorecorder object 

stop(recObj) 

Stop recording 

pause(recObj) 

Pause recording 

resume(recObj) 

Resume recording from paused position 

sound(y,Fs) 

Play sound 

Details and More: 

Help>MATLAB>Daya Import and Analysis>Data Import and Export>Standard File Formats>Audio and Video 
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6.7 Videos 

( \ 

Example06_07.m: Videos 

[1] The following commands demonstrate the reading of a video file in mp4 format and the playing of the video using 
the function movie (Section 6.3). A snapshot of the video is shown in [3], next page. (This example is adapted from 
the example in Help>MATLAB>Data Import and Analysis>Data Import and Export>Standard File Formats>Audio and 
Video>Reading and Writing Files>Read Video Files) 

1 clear 

2 vidObj = VideoReader('xylophone.mp4'); 

3 height = vidObj.Height; 

4 width = vidObj.Width; 

5 rate = vidObj.FrameRate; 

6 Frames.cdata = zeros(height, width, 3, 'uint8'); 

7 Frames.colormap = []; 

8 k = 1; 

9 while hasFrame(vidObj) 

10 Frames(k).cdata = readFrame(vidObj); 

11 k = k+1; 

12 end 

13 set(gcf, 'Position', [150, 150, width, height]) 

14 set(gca, 'Units', 'pixels') 

15 set(gca, 'Position', [0, 0, width, height]) 

16 movie(Frames, 1, rate) 

v_ ) 
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Workspace 


Name a 
SI Frames 
EH height 
fflk 
EB rate 
[cl vidObj 
FH width 


Value 

1x141 struct 

240 

142 

30 


1x1 Video Reader 

320 


Table 6.7 Video Functions 

Functions 

Description 

vidObj = VideoReader(filename) 

Create VideoReader object 

vidObj = VideoWriter(filename) 

Create VideoWriter object 

open(vidObj) 

Open file for writing video data 

close(vidObj) 

Close file after writing video data 

frameData = readFrame(vidObj) 

Read video frame from video file 

writeVideo(vidObj,Frames) 

Write frames to video file 

tf = hasFrame(vidObj) 

Determine if end-of-file reached 

movie(Frames,n,fps) 

Play movie frames 

Details and More: 

Help>MATLAB>Daya Import and Analysis>Data Import and Export>Standard File Formats>Audio and Video 
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6.8 Example: Statically Determinate Trusses (Version 4.0) 


^ Example06_08.m: Truss 4.0 


1 

clear 


2 

Nodes= struct; Members = struct; 


3 

disp(' 1. Input nodal coordinates') 


12 

disp('10. Quit') 


13 

disp('ll. Plot truss') 


14 

while 1 


15 

task = input('Enter the task number: 


16 

switch task 


17 

case 1 


18 

Nodes = inputNodes(Nodes); 


35 

case 10 


36 

break 


37 

case 11 


38 

plotTruss(Nodes, Members) 


39 

end 


40 

end 


41 





6.8 Example: Statically Determinate Trusses (Version 4.0) 273 


42 

function plotTruss(Nodes, Members) 


43 

if (size(fieldnames(Nodes),1)<6 || size(fieldnames(Members),1)<2) 

44 

disp('Truss data not complete'); return 


45 

end 


46 

n = length(Nodes); m = length(Members); 


47 

minx = Nodes(1).x; maxX = Nodes(1).x; 


48 

minY = Nodes(l).y; maxY = Nodes(l).y; 


49 

for k = 2:n 


50 

if (Nodes(k).x < minX) minx = Nodes(k).x; 

end 

51 

if (Nodes(k).x > maxX) maxX = Nodes(k).x; 

end 

52 

if (Nodes(k).y < minY) minY = Nodes(k).y; 

end 

53 

if (Nodes(k).y > maxY) maxY = Nodes(k).y; 

end 

54 

end 


55 

rangeX = maxX-minX; rangeY = maxY-minY; 


56 

axis([minX-rangeX/5, maxX+rangeX/5, minY-rangeY/5, maxY+rangeY/5]) 

57 

ha = gca; delete(ha.Children) 


58 

axis equal off 


59 

hold on 


60 

for k = l:m 


61 

nl = Members(k).node1; n2 = Members(k).node2; 

62 

x = [Nodes(nl).x. Nodes(n2).x]; 


63 

y = [Nodes(nl).y, Nodes(n2).y]; 


64 

plot(x,y,'k-o', 'MarkerFaceColor', 'k') 


65 

end 


66 

for k = lsn 


67 

if Nodes(k).supportx 


68 

x = [Nodes(k).x, Nodes(k).x-rangeX/20, 

Nodes(k).x-rangeX/20, Nodes(k).x]; 

69 

y = [Nodes(k).y, Nodes(k).y+rangeX/40, 

Nodes(k).y-rangeX/40, Nodes(k).y]; 

70 

plot(x,y,'k-') 


71 

end 


72 

if Nodes(k).supporty 


73 

x = [Nodes(k).x, Nodes(k).x-rangeX/40, 

Nodes(k).x+rangeX/40, Nodes(k).x]; 

74 

y = [Nodes(k).y, Nodes(k).y-rangeX/20, 

Nodes(k).y-rangeX/20, Nodes(k).y]; 

75 

plot(x,y,'k-') 


76 

end 


77 

end 


78 

end 
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» Example06_08 

1. Input nodal coordinates 

2. Input connecting nodes of members 

3. Input three supports 

4. Input loads 

5. Print truss 

6. Solve truss 

7. Print results 

8. Save data 

9. Load data 

10. Quit 

11. Plot truss 

Enter the task number: 9 

Enter file name (default Datafile): Datafile04_04a 
Enter the task number: 11 
Enter the task number: 9 

Enter file name (default Datafile): Datafile04_04b 
Enter the task number: 11 
Enter the task number: 10 
» 
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6.9 Additional Exercise Problems 
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Chapter 7 

Data Import and Export 


A program can be viewed as a 
data processing system. Data 
can be exported to or imported 
from a device (e.g., keyboard) 
or a disk file. We’ve seen many 
examples in which data are 
input from the keyboard and 
output to the computer screen. 
We’ve also seen many examples 
in which data are read from and 
written to files. In this chapter, 
we’ll discuss details and more 
about data import and export. 


7.1 Screen Text I/O 278 

7.2 Low-Level Text File I/O 281 

7.3 Low-Level Binary File I/O 286 

7.4 MAT-Files 288 

7.5 ASCII-Delimited Files 290 

7.6 Excel Spreadsheet Files 292 

7.7 Additional Exercise Problems 293 
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7.1 

Screen Text I/O 


r 

Example07_01a.m: input and disp 


[1] The function input reads data from your computer screen and 

the function disp writes data to the computer screen, 
script and enter data as shown in [2]. 

Run this 

1 

clear 


2 

while 1 


3 

a = input('Enter anything: 

'); 

4 

if strcmp(a, 'stop') break. 

end 

5 

disp(class(a) ) 


6 

disp(a) 


7 

end 


V 


) 

8 

» Example07 Ola 


9 

Enter anything: 56 


10 

double 


11 

56 


12 

Enter anything: 3+11 


13 

double 


14 

14 


15 

Enter anything: 5*sin(pi/5)^2 


16 

double 


17 

1.7275 


18 

Enter anything: intl6(56) 


19 

intl6 


20 

56 


21 

Enter anything: 'b' 


22 

char 


23 

b 


24 

Enter anything: 'bcdef' 


25 

char 


26 

bcdef 


27 

Enter anything: b 


28 

Error usinq input 


29 

Undefined function or variable 'b' 

. 

30 

Error in ExamDle07 Ola (line 3) 


31 

a = input('Enter anything: '); 


32 

Enter anything: bcdef 


33 

Error using input 


34 

Undefined function or variable 'bcdef'. 

35 

Error in ExamDle07 Ola (line 3) 


36 

a = input('Enter anything: '); 


37 

Enter anything: 'stop' 


38 

» 



( \ 

Function disp 

[4] A syntax for the function disp is 
disp( var) 

It displays the value of var , which can be any 
type (class) of data. Actually, each class of data 
has its definition of disp. We've demonstrated 
this in Section 4.9 (also see 4.9[10], page 203). 
These are some more examples: 


39 

» 

a [3, 6, 1, 

40 

» 

disp(a) 

41 


3 6 7 

42 

» 

c = 6; d = 5; 

43 

» 

disp(c>d) 

44 


1 


In line 43, the result of c>d is of class 
logical, hence it displays a logical value 1 
(line 44). 


v 










45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 
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» clear 

» a = pi*10000; b = -314; 

» fprintf('%f %f\n', a, b) 
31415.926536 -314.000000 
» fprintf('%.4f %.4f\n', a, b) 

31415.9265 -314.0000 
» fprintf('%12f %12f\n', a, b) 
31415.926536 -314.000000 

» fprintf('%12.4f %12.4f\n', a, b) 

31415.9265 -314.0000 

» fprintf('%8.4f %8.4f\n', a, b) 

31415.9265 -314.0000 

» fprintf('%-12.4f %-12.4f\n', a, b) 

31415.9265 -314.0000 

» fprintf('%+12.4f %+12.4f\n', a, b) 
+31415.9265 -314.0000 

» fprintf('%e %e\n', a, b) 

3.141593e+04 -3.140000e+02 
» fprintf('%.4e %.4e\n', a, b) 

3.1416e+04 -3.1400e+02 
» fprintf('%12.4e %12.4e\n', a, b) 

3.1416e+04 -3.1400e+02 


67 » fprintf('%g %g\n', a, b) 

68 31415.9 -314 

69 » fprintf('%.4g %.4g\n', a, b) 

70 3.142e+04 -314 

71 » fprintf('%12.4g %12.4g\n', a, b) 

72 3.142e+04 -314 

73 » fprintf('%d %d\n', b, b) 

74 -314 -314 

75 » fprintf('%5d %5d\n', b, b) 

76 -314 -314 

77 » fprintf('%c %c\n', 'A', 'B') 

78 A B 

79 » fprintf('%c %c\n', 65, 66) 

80 A B 

81 » fprintf('%5c %5c\n', 'A', 'B') 

82 A B 

83 » fprintf('%s %s\n'A'string') 

84 A string 

85 » fprintf('%8s %15s\n'A'string') 

86 A string 

87 » fprintf('%3s %3s\n'A'string') 

88 A string 
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Table 7.1a Examples of Format Specifications 

Format 

Description 

%8.4f 

Fixed-point notation 

o\o 

00 

CD 

Exponential notation 

%8.4g 

The more compact of %f or %e 

%8d 

Signed integer 

%8u 

Unsigned integer 

%8c 

Character 

%8s 

String 

Details and More: Help>MATLAB>Data Import and Analysis>Data Import and Export> 

Lower-Level File l/0>fprintf>Input Arguments>formatSpec 


Table 7.1b Screen Text I/O 

Functions 

Description 

x = input(prompt, 's') 

Request user input 

disp(x) 

Display value of variable 

fprintf(format,a, b ,.••) 

Write text data to screen or file 

s = sprint f (format,a, b, ...) 

Format text data into string 




















7.2 Low-Level Text File I/O 281 


7.2 Low-Level Text File I/O 

Example07_02.m: Text-File Explorer 

[1] This program, a "text-file explorer,” is designed to demonstrate many text-file I/O functions (see Table 7.2, page 
285). We'll use the file Example07_01a.m (page 278, which is a text file of 124 characters; see a copy in [3], next page) 
as the target to test this program. Before looking into each statement, test run this program as shown in [4], page 283. 

1 clear 

2 fileName = input('Enter the file name: ', 's'); 

3 filelD = fopen(fileName); 


disp( 

disp( 

disp( 

disp( 

disp( 

disp( 

disp( 

disp( 


stop') 

Read the file once for all') 

Read the file one line at a time') 
Read a line') 

Read a character') 

Rewind to the beginning') 

Move forward a character') 

Move backward a character') 


while 1 

task = input('Enter task number: 
switch task 
case 0 

fclose(filelD); 
break 


text = fileread(fileName); 
disp(text) 

characters = length(text); 
disp([num2str(characters), 1 

case 2 

frewind(filelD), lines = 0; 
while ~feof(filelD) 

text = fgetl(filelD); 
disp(text) 
lines = lines+1; 
characters = characters 


characters read']) 


characters = 0; 


length(text); 


disp([num2str(lines), ' lines read']) 

disp([num2str(characters), ' characters read']) 

case 3 

if feof(filelD) 

disp('End of filel') 

else 

text = fgetl(filelD); 
disp(text); 

end 


(Continued at [2], next page) —» 
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[2] Example07_02.m (Continued). 

case 4 


40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 


%c\ 1); 


if feof(filelD) 

disp('End of file!') 

else 

text = fscanf(filelD, 
disp(text); 

end 
case 5 

frewind(filelD) 
case 6 

if feof(filelD) 

disp('End of file!') 

else 

fseek(filelD, 1, 'cof'); 

end 
case 7 

if ftell(filelD) == 0 

disp('Beginning of file!') 

else 

fseek(filelD, -1, 'cof'); 

end 

end 

position = ftell(filelD); 

disp(['File pointer at ', num2str(position)]) 


end 


clear 
while 1 

a = input('Enter anything: '); 
if strcmp(a, 'stop') break, end 
disp(class(a)) 
disp(a) 


end 




65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 
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» Example07_02 

Enter the file name: Example07_01a.m 
0. stop 

1. Read the file once for all 

2. Read the file one line at a time 

3. Read a line 

4. Read a character 

5. Rewind to the beginning 

6. Move forward a character 

7. Move backward a character 
Enter task number: 1 

clear 
while 1 

a = input('Enter anything: '); 
if strcmp(a, 'stop') break, end 
disp(class(a)) 
disp(a) 

end 

119 characters read 
File pointer at 0 
Enter task number: 2 
clear 
while 1 

a = input('Enter anything: '); 
if strcmp(a, 'stop') break, end 
disp(class(a)) 
disp(a) 

end 

7 lines read 

113 characters read 

File pointer at 119 


96 

Enter task number: 

5 

97 

File pointer at 0 


98 

Enter task number: 

3 

99 

clear 


100 

File pointer at 6 


101 

Enter task number: 

3 

102 

while 1 


103 

File pointer at 14 


104 

Enter task number: 

5 

105 

File pointer at 0 


106 

Enter task number: 

4 

107 

c 


108 

File pointer at 1 


109 

Enter task number: 

6 

110 

File pointer at 2 


111 

Enter task number: 

4 

112 

e 


113 

File pointer at 3 


114 

Enter task number: 

4 

115 

a 


116 

File pointer at 4 


117 

Enter task number: 

7 

118 

File pointer at 3 


119 

Enter task number: 

4 

120 

a 


121 

File pointer at 4 


122 

Enter task number: 

3 

123 

r 


124 

File pointer at 6 


125 

Enter task number: 

0 

126 

» 
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Table 7.2 Low-Level Text File I/O 

Functions 

Description 

filelD = fopen(filename,permission) 

Open file 

fclose(filelD) 

Close one or all open files 

tf = feof ( filelD) 

Test for end-of-file 

[message,errnum] = ferror(filelD) 

Information about file I/O errors 

s = fgetl(filelD) 

Read line from file, removing newline character 

s = fgets(filelD) 

Read line from file, keeping newline character 

s = fileread(filename) 

Read contents of file into string 

fprintf(filelD,format,a,b,... ) 

Write data to text file 

frewind ( filelD ) 

Move file position indicator to beginning of open file 

a = fscanf ( filelD,format ) 

Read formatted data from text file 

fseek(filelD,offset,origin ) 

Move to specified position in file 

position = ftell ( filelD) 

Position in open file 

type filename 

Display contents of file 

Details and More: Help>MATLAB>Data Import and Analysis>Data Import and Export>Low-Level File I/O 
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7.3 Low-Level Binary File I/O 


Byte 

Bits 

Bit Pattern 
7654 3210 

uint8 Value 

1 

0-7 

0000 0000 

0 

2 

8-15 

0000 0000 

0 

3 

16-23 

0000 0000 

0 

4 

24-31 

0000 0000 

0 

5 

32-39 

0000 0000 

0 

6 

40-47 

0000 0000 

0 

7 

48-55 

0011 1100 

60 

8 

56-63 

0100 0000 

64 


Example07_03.m: Bit Pattern 

[2] This script confirms the concepts presented in [1]. —» 

1 clear 

2 a = 28; 

3 filelD = fopen('tmp.dat','w+'); 

4 fwrite(filelD, a, 'double')? 

5 frewind(filelD) 

6 b = fread(filelD, 8, 'uint8'); 

7 disp(b') 

8 fclose(filelD); 

9 delete('tmp.dat') 


V 
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Table 7.3 Low-Level Binary File I/O 

Functions 

Description 

filelD = fopen(filename,permission) 

Open file 

fclose(filelD) 

Close one or all open files 

a = fread(filelD,size) 

Read data from binary file 

fwrite(filelD,a) 

Write data to binary file 

tf = feof(filelD) 

Test for end-of-file 

[message,errnum] = ferror(filelD) 

Information about file I/O errors 

frewind(filelD) 

Move file position indicator to beginning of open file 

fseek(filelD,offset,origin) 

Move to specified position in file 

position = ftell(filelD) 

Position in open file 

Details and More: Help>MATLAB>Data Import and Analysis>Data Import and Export>Low-Level File I/O 
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7.4 MAT-Files 


( ~ ^ 

Example07_04.m: Out-of-Core Matrices 

[2] This script demonstrate the ideas in [1]. 

1 clear 

2 M = matfile('tmp'); 

3 n = 10; 

4 for i = l:n 

5 for j = lsn 

6 M.A(i,j) = i+(j-l)*n; 

7 end 

8 end 

9 clear 

10 load('tmp') 

11 delete('tmp.mat') 

12 disp(A) 

v_ J 


1 

11 

21 

31 

41 

2 

12 

22 

32 

42 

3 

13 

23 

33 

43 

4 

14 

24 

34 

44 

5 

15 

25 

35 

45 

6 

16 

26 

36 

46 

7 

17 

27 

37 

47 

8 

18 

28 

38 

48 

9 

19 

29 

39 

49 

10 

20 

30 

40 

50 


51 

61 

71 

81 

91 

52 

62 

72 

82 

92 

53 

63 

73 

83 

93 

54 

64 

74 

84 

94 

55 

65 

75 

85 

95 

56 

66 

76 

86 

96 

57 

67 

77 

87 

97 

58 

68 

78 

88 

98 

59 

69 

79 

89 

99 

60 

70 

80 

90 

100 
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Table 7.4 MAT-Files 

Functions 

Description 

load(filename) 

Load variables from file into Workspace 

save(filename,vl,v2,...) 

Save variables to file 

save filename 

Save all variables to file 

M = matfile(filename) 

Access variables in MAT-files, without loading into memory. 


Details and More: 

Help>MATLAB>Data Import and Analysis>Data Import and Export> Workspace Variables and MAT-Files 
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7.5 ASCII-Delimited Files 


Example07_05 .m 

[1] An ASCII-delimited file is a text file containing data separated by delimiters such as space, comma, tab, semicolon, 
newline, etc. This script demonstrates the manipulation of ASCII-delimited files. 

1 clear 

2 type count.dat 

3 A = dlmread('count.dat'); 

4 dlmwrite('tmp.dat', A) 

5 type tmp.dat 

6 clear 

7 B = csvread('tmp.dat'); 

8 delete tmp.dat 

9 csvwrite('tmpl.dat', B) 

10 type tmpl.dat 

11 delete tmpl.dat 

V_ J 


» type count.dat 


11 

11 

9 

7 

13 

11 

14 

17 

20 

11 

13 

9 

43 

51 

69 

38 

46 

76 

61 

132 

186 

75 

135 

180 

38 

88 

115 

28 

36 

55 

12 

12 

14 

18 

27 

30 

18 

19 

29 

17 

15 

18 

19 

36 

48 

32 

47 

10 

42 

65 

92 

57 

66 

151 

44 

55 

90 

114 

145 

257 

35 

58 

68 

11 

12 

15 

13 

9 

15 

10 

9 

7 


» type tmp.dat 

11.11.9 
7,13,11 
14,17,20 

11.13.9 
43,51,69 
38,46,76 
61,132,186 
75,135,180 
38,88,115 
28,36,55 

12.12.14 
18,27,30 
18,19,29 
17,15,18 
19,36,48 

32.47.10 
42,65,92 
57,66,151 
44,55,90 
114,145,257 
35,58,68 

11.12.15 

13.9.15 
10,9,7 
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Table 7.5 ASCII-Delimited Files 

Functions 

Description 

M = dlmread(filename) 

Read ASCII-delimited file into matrix 

dlmwrite(filename,M) 

Write matrix to ASCII-delimited file 

M = csvreadffilename) 

Read comma-separated value file (CSV) 

csvwrite(filename,M) 

Write comma-separated value file (CSV) 


Details and More: 

Help>MATLAB>Data Import and Analysis>Data Import and Export>Standard File Formats>Text Files 
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7.6 Excel Spreadsheet Files 


Example07_06.m: Excel Files 

[1] MATLAB provides functions that write to (xlswrite) and read 
from (xlsread) Microsoft Excel spreadsheet files (.xlsor .xlsx 
files). To use these functions, you need to have Microsoft Excel 
installed in your computer. This script demonstrates the use of these 
functions. 

1 clear 

2 A = reshape(1:15, 5, 3); 

3 xlswrite('tmp', A, 'Sheet1', 'A2') 

4 title = {'First', 'Second', 'Third'}; 

5 xlswrite('tmp', title, 'Sheetl', 'AlsCl') 

6 clear 

7 [num, txt] = xlsread('tmp', 'Sheetl') 

8 delete('tmp.xls') 

v_ J 


num = 

16 11 

2 7 12 

3 8 13 

4 9 14 

5 10 15 

txt = 

1x3 cell array 

'First' 'Second' 'Third' 


Workspace 

® 

Name l. 

Value 

lilnum 
lil txt 

5x3 double 


Table 7.6 Excel Spreadsheet Files 

Functions 

Description 

[num,txt] = xlsread(filename,sheet,range) 

Read Microsoft Excel spreadsheet file 

xlswrite(filename,M,sheet,range) 

Write Microsoft Excel spreadsheet file 

Details and More: 

Help>MATLAB>Data Import and Analysis>Data Import and Export>Standard File Formats>Spreadsheets 
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7.7 Additional Exercise Problems 


Downloads 


Related links 
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USA Average Temperature 



Yea- 





Chapter 8 

Graphical User Interfaces 


User interface design is a 
crucial part of programming 
activities. It is not uncommon 
that a programmer spends a 
majority of programming time 
designing the graphical user 
interface of a program. It is 
also not uncommon that a 
software package fails in the 
market just because it has a 
poor user interface design, even 
if it has excellent 
functionalities. 


8.1 Predefined Dialog Boxes 296 

8.2 Ul-Controls: Pushbuttons 300 

8.3 Example: Image Viewer 304 

8.4 UI-Menus: Image Viewer 307 

8.5 Panels, Button Groups, and More Ul-Controls 309 

8.6 Ul-Controls: Sliders 315 

8.7 UI-Tables: Tmss Data 317 

8.8 Example: Statically Determinate Tmsses (Version 5.0) 320 

8.9 GUIDE: 328 

8.10 App Designer 339 

8.11 Additional Exercise Problems 356 
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8.1 Predefined Dialog Boxes 


Example08_01a.m: Triangle 

[1] MATLAB provides many predefined dialog boxes (Table 8.1, page 299). The following script demonstrates some of 
these predefined dialog boxes. This script requests the user for three sides of a triangle as shown in [2], calculates the 
three angles according to the Law of Cosine (2.11 [6], page 106), and displays the result as shown in [3]. If the three 
sides do not satisfy the triangle inequality (explained in [4], next page), an error dialog box as shown in [5] (next 
page) is displayed. 

1 clear 

2 answer = inputdlg({'Side-1', 'Side-2', 'Side-3'}, ... 

3 'Input data', 1, {'5', '6', '!'}); 

4 s = str2double(answer); 

5 s = sort(s); a = s(1); b = s(2); c = s(3); 

6 if (a+b) <= c 

7 errordlg(’Triangle not exsist', 'Error!', 'modal') 

8 else 

9 alpha = acosd( (b A 2+c A 2-a A 2 ) / ( 2*b*c) ) ; 

10 beta = acosd((c A 2+a A 2-b A 2)/(2*c*a)); 

11 gamma = acosd( (a A 2+b A 2-c A 2 ) / ( 2*a*b) ) ; 

12 message = sprintf('Three angles are %.2f, %.2f, and %.2f degrees.', ... 

13 alpha, beta, gamma); 

14 msgbox(message, 'Output data', 'modal') 

15 end 

V_ ) 


E 


Input data 


,j£|xj 


Side-1 

F 

Side-2 

F 

Side-3 

i 

OK I Cancel 


E 


Ontpnt data 


JnJxJ 


Three angles are 78.46. 57.12, and 44.42 degrees. 

] 


OK 
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E 


Error! 



Triangle notexsist 


-iDlxl 
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Example08_01b.m: Voice Recorder 

[6] This script, an enhanced version of Example06_06b.m (page 268), uses additional predefined dialog boxes. It 
displays a menu of 5 tasks for you to choose [7-8]: start the recording, end the recording, play the voice, save the voice 
as a sound file, and load a sound file. 


16 

clear 


17 

y = 

[]? 


18 

while 1 


19 


choice = menu('Voice Recorder', ... 

20 



'Start', 'End', 'Play', 'Save', 'Load'); 

21 


switch choice 

22 



case 0 % The user clicks the close button 

23 



break 

24 



case 1 % Start recording 

25 



recObj = audiorecorder; 

26 



record(recObj) 

27 



case 2 % End recording 

28 



stop(recObj) 

29 



y = getaudiodata(recObj); 

30 



Fs = recObj.SampleRate; 

31 



case 3 % Play 

32 



if isempty(y) 

33 



errordlg('Empty!','Error I','modal' 

34 



else 

35 



sound(y, Fs); 

36 



end 

37 



case 4 % Save 

38 



if isempty(y) 

39 



errordlg('Empty I','Error!','modal' ’ 

40 



else 

41 



[file, path] = uiputfile('*.wav'); 

42 



if file 

43 



audiowrite([path, file], y, Fs; 

44 



end 

45 



end 

46 



case 5 % Load 

47 



[file, path] = uigetfile('*.wav'); 

48 



if file 

49 



[y, Fs] = audioread([path, file]); 

50 



end 

51 


end 


52 

end 




- |n| xj 

Voice Recorder 



J 


V 
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Table 8.1 Predefined Dialog Boxes 

Functions 

Description 

errordlg(message,title,mode) 

Create error dialog box 

warndlg(message,title,mode) 

Create warning dialog box 

msgbox(message,title,mode) 

Create message dialog box 

waitbar(x,message) 

Open or update wait bar dialog box 

button = questdlg(message,title) 

Create yes-no-cancel dialog box 

answer = inputdlg(prompt,title,n,default) 

Create dialog box that gathers user input 

choice = listdlg(name,value) 

Create list-selection dialog box 

[file,path] = uigetfile(filterSpec) 

Open file-selection dialog box 

[file,path] = uiputfile(filterSpec) 

Open dialog box for saving files 

choice = menu(message,opl,op2,...) 

Create multiple-choice dialog box 

Details and More: Help>MATLAB>App Building> GUIDE or Programmatic Workflow>Dialog Boxes 
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8.2 Ul-Controls: Pushbuttons 


1 

voiceRecorder 



Z 

3 

function voiceRecorder 



4 

y = []; Fs = 0; recObj = []; 



5 

figure('Position', [300, 300, 200, 

300], ... 

6 

'Name', 'Voice Recorder', ... 



7 

'MenuBar', 'none', ... 



8 

'NumberTitle', 'off'); 



9 

uicontrol('Style', 'pushbutton', . 

. . 


10 

'String', 'Start', ... 



11 

'Position', [50, 250, 100, 20] 

! • 

. . 

12 

'Callback', @cbStart) 



13 

uicontrol('Style', 'pushbutton', . 

. . 


14 

'String', 'End', ... 



15 

'Position', [50, 210, 100, 20] 

r • 

. . 

16 

'Callback', @cbEnd) 



17 

uicontrol('Style', 'pushbutton', . 

. . 


18 

'String', 'Play', ... 



19 

'Position', [50, 170, 100, 20] 

r • 

. . 

20 

'Callback', @cbPlay) 



21 

uicontrol('Style', 'pushbutton', . 

. . 


22 

'String', 'Save', ... 



23 

’Position', [50, 130, 100, 20] 

r 

. . 

24 

'Callback', @cbSave) 



25 

uicontrol('Style', 'pushbutton', . 

. . 


26 

'String', 'Load', ... 



27 

'Position', [50, 90, 100, 20], 

. . 

. 

28 

'Callback', @cbLoad) 



29 

uicontrol('Style', 'pushbutton', . 

. . 


30 

'String', 'Quit', ... 



31 

'Position', [50, 50, 100, 20], 

. . 

. 

32 

'Callback', @cbQuit) 



33 




34 

function cbStart(~, ~) 



35 

recObj = audiorecorder; 



36 

record(recObj) 



37 

end 



38 




39 

function cbEnd(~, ~) 



40 

stop(recObj) 



41 

y = getaudiodata(recObj); 



42 

Fs = recObj.SampleRate; 



43 

end 



44 




45 

function cbPlay(~, ~) 



46 

if isempty(y) 



47 

errordlg('Empty voice! 

r 

'modal') 

48 

else 



49 

sound(y, Fs); 



50 

end 



51 

end 



52 







53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 
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function cbSave(~, ~) 
if isempty(y) 

errordlg('Empty voice!', 'modal') 

else 

[file, path] = uiputfile('*.wav'); 
if file 

audiowrite([path, file], y, Fs) 

end 

end 

end 

function cbLoad(~, ~) 

[file, path] = uigetfile('*.wav'); 
if file 

[y, Fs] = audioread([path, file]); 

end 

end 

function cbQuit(~, ~) 
close 

end 

end 


IflYoice Recorder 

^JOjx] 

Start 

J 

End 

J 

Play 

J 

Save 

J 

Load 

J 

Quit 

J 
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8.2 Ul-Controls: Pushbuttons 303 


Table 8.2a UI Control Properties 

Property 

Description 

Style 

Style of UI control. (See Table 8.2b) 

Parent 

Parent of uicontrol. 

Position 

Location and size of UI control, [left, bottom, width, height]. 

Units 

Units of measurement. (Default: pixels) 

FontSize 

Font size for text, a positive number. 

String 

Text to display. 

BackgroundColor 

Background color of uicontrol 

HorizontalAlignment 

Alignment of text. 

Callback 

Callback function when user interacts with uicontrol 

ButtonDownFcn 

Button-press callback function 

UIContextMenu 

Uicontrol context menu. 

Value 

Current value of uicontrol. 

Max 

Maximum value of uicontrol. 

Min 

Minimum value of uicontrol. 

SliderStep 

Slider step size. 

Enable 

Operational state of uicontrol 

Details and More: Help>MATLAB>App Building>GUIDE or Programmatic Workflow> 

Components and Layout>Interactive Components> Uicontrol Properties 


Table 8.2b Style of UI Control 

Style 

Description 

pushbutton 

Button that appears to depress until you release the mouse button. 

togglebutton 

The state of a toggle button changes every time you click it. 

checkbox 

The state of a toggle button changes every time you click it. 

radiobutton 

Radio buttons are intended to be mutually exclusive within a group of buttons. 

edit 

Editable text field. 

text 

Static text field. 

slider 

The position of a slider button indicates a value within a range. 

listbox 

List of items from which the user can select one or more items. 

popupmenu 

Menu that expands to display a list of choices. 

Details and More: Help>MATLAB>App Building> GUIDE or Programmatic Workflow> 

Components and Layout>Interactive Components> Uicontrol Properties>Type of Control>Style 
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8.3 Example: Image Viewer 


Example08_03.m: Image Viewer 

[1] This program opens an image file and displays it on a Figure window ([4-6], next page). It also can save the file as 
another file name. This program demonstrates a more sophisticated use of functions uigetf ile and uiputf ile 
([5], page 306), which we used in Example08_01b.m, page 298. Locations and sizes of the Axes and the pushbuttons 
are specified in normalized units, so the Figure window can be resized without twisting the components in the Figure 
window [6]. (Continued at [2], next page.) —» 

1 imageViewer 

2 

3 function imageViewer 

4 Photo = []; 

5 figure('Position', [30, 30, 600, 400], ... 

6 'Name', 'Image Viewer', ... 

7 'MenuBar', 'none', ... 

8 'NumberTitle', 'off'); 

9 axes('Position', [.1 .1 .7 .8]); 

10 uicontrol('Style', 'pushbutton', ... 

11 'String', 'Open...', ... 

12 'Callback', @cbOpen, ... 

13 'Units', 'normalized', ... 

14 'Position', [.825, .6, .15, .1]) 

15 hSaveAs = uicontrol('Style', 'pushbutton', ... 

16 'String', 'Save As...', ... 

17 'Callback', @cbSaveAs, ... 

18 'Enable', 'off', ... 

19 'Units', 'normalized', ... 

20 'Position', [.825, .4, .15, .1]); 

21 uicontrol('Style', 'pushbutton', ... 

22 'String', 'Quit', ... 

23 'Callback', 'close', ... 

24 'Units', 'normalized', ... 

25 'Position', [.825, .2, .15, .1]) 

26 

27 function cbOpen(~, ~) 

28 [file, path] = uigetfile( ... 

29 {'*.png', 'Portable Network Graphics (*.png)'; ... 

30 '*•jpg;*•jpeg', 'Joint Photographic Experts Group (*.jpg;*.jpeg)'; ... 

31 '*.tif;*.tiff', 'Tagged Image File Format (*.tif;*.tiff)'}); 

32 if file 

33 Photo = imread([path, file]); 

3 4 image(Photo); 

35 axis off image 

36 hSaveAs.Enable = 'on'; 

37 end 

38 end 

39 
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40 

function cbSaveAs(~, ~) 


41 

[file, path] = uiputfile( ... 


42 

{'*.png', 

'Portable Network Graphics 

(*•png)'? ... 

43 

’*•jpg’ / 

'Joint Photographic Experts 

Group (*.jpg)'; 

44 

'*.tif 1 , 

'Tagged Image File Format ( 


45 

if file 



46 

imwrite(Photo, [path, file]) 


47 

end 



48 

end 



49 

end 
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[Portable Network Graphics (*.pr ▼ | 


Portable Network Graphics (*.png) 


Joint Photographic Experts Group (*.jpg;*.jpeg) 
Tagged Image File Format (*.tif;*.tiff) 
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8.4 UI-Menus: Image Viewer 


Example08_04.m: Image Viewer (UI-Menus) 

[1] Another way to implement a GUI for the Imager Viewer is using pulldown menus. This program, modified from 
Example08_03.m (pages 304-305), demonstrates the use of the Ul-menus, including nested menus (submenus) asshown 
in [2], next page. Note that the callback function cbOpen (lines 18-29) is the same as that in Example08_03.m. —» 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 


imageViewer 

function imageViewer 
Photo =[]? 

figure('Position', [30, 30, 600, 400], ... 

'Name', 'Image Viewer', ... 

'ToolBar', 'none', ... 

'NumberTitle', 'off')? 
axes('Position', [.15 .1 .7 .8]); 
hlmage = uimenu('Label', 'Image'); 

uimenu(hlmage, 'Label', 'Open...', 'Callback', @cbOpen) 
hSaveAs = uimenu(hlmage, 'Label', 'Save As', 'Enable', 'off'); 

hPNG = uimenu(hSaveAs, 'Label', 'PNG', 'Callback', @cbSaveAs); 

hJPG = uimenu(hSaveAs, 'Label', 'JPG', 'Callback', @cbSaveAs); 

hTIF = uimenu(hSaveAs, 'Label', 'TIF', 'Callback', @cbSaveAs); 

uimenu(hlmage, 'Label', 'Quit', 'Callback', 'close') 

function cbOpen(~, ~) 

[file, path] = uigetfile( ... 

{'*.png', 'Portable Network Graphics (*.png)'; ... 

'*•jpg?*•jpeg', 'Joint Photographic Experts Group (*•jpg?*.jpeg)'; ... 

'*.tif;*.tiff', 'Tagged Image File Format (*.tif;*.tiff)'}); 
if file 

Photo = imread([path, file]); 
image(Photo); 
axis off image 
hSaveAs.Enable = 'on'; 

end 

end 

function cbSaveAs(h, ~) 
if h == hPNG 

[file,path] = uiputfile({'*.png','Portable Network Graphics (*.png)'}); 
elseif h == hJPG 

[file,path] = uiputfile({'*.jpg','Joint Photographic Experts Group (*.jpg)'}); 

else 

[file,path] = uiputfile({'*.tif','Tagged Image File Format (*.tif)'}); 

end 

if file 

imwrite(Photo, [path, file]) 

end 

end 

end 
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Table 8.4 UI-Menus Properties 

Property 

Description 

Label 

Menu label 

Callback 

Callback function when the user select the ui-menu 

Separator 

Separator line mode (off) 

Enable 

Operational state of ui-menu (on) 

Accelerator 

Keyboard equivalent 

Parent 

Parent of ui-menu 

Details and More: Help>MATLAB>App Building>GUIDE or Programmatic Workflow>Components and Layout> 

Properties>Interactive Components>Uimenu Properties 















8.5 Panels, Button Groups, and More Ul-Controls 309 


8.5 Panels, Button Groups, and More Ul-Controls 


Example08_05.m: Sorting and Searching 

[1] This program is a GUI version of Example03_13.m (pages 151-152). The GUI is shown in [5-10], page 312. Note 
that the functions sort and search (lines 134-163) are the same as those in Example03_13.m (page 152). 

(Continued at [2], next page.) —» 

1 sortSearch 

2 

3 function sortSearch 

4 figure('Position', [30, 30, 400, 400], ... 

5 'Name', 'Sorting and Searching', ... 

6 'MenuBar', 'none', ... 

7 'NumberTitle', 'off', ... 

8 'Resize', 'off') 

9 uicontrol('Style', 'text', ... 

10 'String', 'List of Numbers', ... 

11 'Units', 'normalized', ... 

12 'Position', [.1 .8 .25 .1]) 

13 hList = uicontrol('Style', 'listbox', ... 

14 'Units', 'normalized', ... 

15 'Position', [.1 .1 .25 .75]); 

16 hPanell = uipanel('Position', [.4 .725 .55 .2]); 

17 uicontrol(hPanell, 'Style', 'text', ... 

18 'String', 'Enter a Number', ... 

19 'Units', 'normalized', ... 

20 'Position', [.1 .6 .35 .2]) 

21 uicontrol(hPanell, 'Style', 'edit', ... 

22 'Callback', @cbEnter, ... 

23 'Units', 'normalized', ... 

24 'Position', [.1 .1 .35 .4]) 

25 hSort = uicontrol(hPanell, 'Style', 'checkbox', ... 

26 'String', 'Sort', ... 

27 'Callback', @cbSort, ... 

28 'Value', true, ... 

29 'Units', 'Normalized', ... 

30 'Position', [.6 .4 .35 .2]); 

31 hPanel2 = uipanel(’Position’, [.4 .4 .55 .3]); 

32 uicontrol(hPanel2, 'Style', 'text', ... 

33 'String', 'Find a Number', ... 

34 'Units', 'Normalized', ... 

35 'Position', [.1 .6 .35 .2]) 

36 hFind = uicontrol(hPanel2, 'Style', 'edit', ... 

37 'Callback', @cbFind, ... 

38 'Enable', 'off', ... 

39 'Units', 'normalized', ... 

40 'Position', [.1 .35 .35 .25]); 
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[2] Example08_05.m (Continued). (Continued at [3], next page.) —» 


41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 
89 


hGroup = uibuttongroup(hPanel2, ... 

'Position', [.5, .2, .45, .6]); 

uicontrol(hGroup, 'Style', 'radiobutton', ... 

'String', 'Keep', ... 

'Value', true, ... 

'Units', 'normalized', ... 

'Position', [.2 .6 .7 .3]) 
hRemove = uicontrol(hGroup, 'Style', 'radiobutton 
'String', 'Remove', ... 

'Units', 'normalized', ... 

'Position', [.2 .1 .7 .3]); 
uicontrol('Style', 'pushbutton', ... 

'String', 'Open...', ... 

'Callback', @cbOpen, ... 

'Units', 'normalized', ... 

'Position', [.45 .3 .2 .075]) 
hSaveAs = uicontrol('Style', 'pushbutton', ... 

'String', 'Save As...', ... 

'Callback', @cbSaveAs, ... 

'Enable', 'off', ... 

'Units', 'normalized', ... 

'Position', [.45 .2 .2 .075]); 
uicontrol('Style', 'pushbutton', ... 

'String', 'Quit', ... 

'Callback', 'close', ... 

'Units', 'Normalized', ... 

'Position', [.45 .1 .2 .075]); 

function cbEnter(h, ~) 

number = str2double(h.String); 
h.String = []; 
if isempty(hList.String) 
a = [ ] ? 

else 

a = str2double(hList.String); 

end 

if search(a, number) > 0 

errordlg('The number exists!') 

else 

a(length(a)+l) = number; 
if hSort.Value 
a = sort(a); 

end 

hList.String = num2cell(a); 

end 

hSaveAs.Enable = 'on'; 
hFind.Enable = 'on'; 

end 



8.5 Panels, Button Groups, and More Ul-Controls 311 


[3] Example08_05.m (Continued). (Continued at [4], next page.) —» 

90 function cbSort(~, ~) 

91 a = str2double(hList.String); 

92 if hSort.Value && -isempty(a) 

93 a = sort(a); 

94 hList.String = num2cell(a); 

95 end 


function cbFind(h, ~) 

number = str2double(h.String); 
h.String = []; 

a = str2double(hList.String); 
k = search(a, number); 
if k == 0 

errordlg('The number not exist!') 

else 

hList.Value = k; 
if hRemove.Value 
n = length(a); 

b(l:n-l,l) = [a(1s k—1);a(k+l:n)]; 
hList.String = num2cell(b); 


function cbOpen(~, ~) 

[file, path] = uigetfile('*.mat'); 
if file 

load([path, file], 'a'); 
hList.String = num2cell(a); 
hSaveAs.Enable = 'on'; 
hFind.Enable = 'on'; 


function cbSaveAs(~, ~) 

[file, path] = uiputfile('*.mat'); 
if file 

a = str2double(hList.String); 
save([path, file], 'a'); 

end 
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[4] Example08_05.m (Continued). 

134 function out = sort(a) 
n = length(a); 
for i = n-l:-l:l 
for j = l:i 

if a(j) > a(j+1) 
tmp = a(j); 

a(j) = a(j+ 1 ); 

a(j+1) = tmp; 

end 

end 

end 

out = a; 
end 


135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 
161 
162 
163 


function found = search(a, key) 

n = length(a); 

low = 1; 

high = n; 

found = 0; 

while low <= high && -found 

mid = floor((low+high)/2); 
if key == a(mid) 
found = mid; 
elseif key < a(mid) 
high = mid-1; 

else 

low = mid+1; 

end 

end 

end 




^jrjxj 




Enter a Number 

17 Sort 




(* Keep 
C Remove 


[6] The user enters 
numbers in this 

editable text box. 


[8] If this check box is 
checked, the list is 
sorted each time the 
user enters a number. 
Otherwise, the number 
is simply appended to 
the list. 




[9] The user may search a 
number by entering a number 
in this editable text box. 



[7] The numbers 
show in the list box, 


[10] States of radio buttons within a group are mutually 
exclusive. When Keep is selected, the found number is 
highlighted. When Remove is selected, the found 
number is removed from the list. —» 
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Table 8.5 Ul-Controls and Indicators 

Function 

Description 

hf = figure 

Create figure window 

ha = axes 

Create axes object 

h = uicontrol(parent,name,value) 

Create Ul-control 

h = uitable(parent,name,value) 

Create table UI component 

h = uipanel(parent,name,value) 

Create panel container object 

h = uibuttongroup(parent,name,value) 

Create button group to manage radio buttons and toggle buttons 

h = uitab(parent,name,value) 

Create tabbed panel 

h = uitabgroup(parent,name,value) 

Create container for tabbed panels 

Details and More: 

Help>MATLAB>App Building>GUIDE or Programmatic Workflow> Components and Layout>UI Components 
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8.6 UI-Controls: Sliders 

Example08_06.m: Sliders 

[1] This program demonstrates the use of a slider to adjust the value of an input data (see [2-6], next page). —» 

1 sliderDemo 

2 

3 function sliderDemo 

4 figure('Position', [50, 50, 400, 400], ... 

5 'Name', 'Slider Demo', ... 

6 'MenuBar', 'none', ... 

7 'NumberTitle', 'off') 

8 axes('Position', [.1 .5 .8 .4]) 

9 omega = 1; 

10 sinewave(omega); 

11 hEdit = uicontrol('Style', 'edit', ... 

12 'String', num2str(omega), ... 

13 'Callback', @cbEdit, ... 

14 'Units', 'normalized', ... 

15 'Position', [.4 .3 .2 .05]); 

16 hSlider = uicontrol('Style', 'slider', ... 

17 'Callback', @cbSlider, ... 

18 'Units', 'normalized', ... 

19 'Position', [.2 .1 .6 .05], ... 

20 'Value', 1, ... 

21 'Min', 0, ... 

22 'Max', 10, ... 

23 'SliderStep', [0.01, 0.1]); 

24 

25 function cbEdit(h, ~) 

26 omega = str2double(h.String); 

27 hSlider.Value = omega; 

2 8 sinewave(omega); 

2 9 end 

30 

31 function cbSlider(h, ~) 

32 omega = h.Value; 

33 hEdit.String = num2str(omega); 

34 sinewave(omega); 

35 end 

36 

37 function sinewave(omega) 

38 t = linspace(0, 2*pi); 

39 y = sin(omega*t); 

40 plot(t, y) 

41 axis([0, 2*pi, -1, 1]) 

42 end 

43 end 
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8.7 UI-Tables: Truss Data 


Example08_07a.m: Truss Nodal Data 


[1] This program demonstrates the use of a Ul-table to input the truss nodal data such as those listed in Table3.14a (page 

157). Run the program and experience the operations of the Ul-table as shown in 

[2-5], next page. This Ul-tables 

created in this section will be integrated into the Statically Determinate Trusses program in the next section. —» 

1 

trussNodalData 


z 

3 

function trussNodalData 


4 

Nodes = struct('x' f 0, ' y' , 0, ... 


5 

'supportx', false, 'supporty', false, ... 


6 

'loadx', 0, 'loady', 0, ... 


7 

'reactionx', 0, 'reaction', 0); 


8 

figure('Position', [30, 30, 590, 200], ... 


9 

'Name', 'Nodal Data', ... 


10 

'MenuBar', 'none', ... 


11 

'NumberTitle', 'off') 


12 

data = struct2cell(Nodes)'; 


13 

columnName = {'X', 'Y', 'Supportx', 'SupportY', .. 

. 

14 

'LoadX', 'LoadY', 'ReactionX', 'ReactionY'}; 


15 

columnFormat = {'numeric', 'numeric', ... 


16 

'logical', 'logical', ... 


17 

'numeric', 'numeric', 'numeric', 'numeric'}; 


18 

columnEditable = logical([l 1111100]); 


19 

uitable('Data', data, ... 


20 

'KeyPressFcn', @cbKeyPressNodes, ... 


21 

'ColumnName', columnName, ... 


22 

'ColumnFormat', columnFormat, ... 


23 

'ColumnEditable', columnEditable, ... 


24 

'ColumnWidth', {60}, ... 


25 

'Units', 'normalized', ... 


26 

'Position', [.05 .1 .9 .8]); 


27 



28 

function cbKeyPressNodes(hTable, hKey) 


29 

if strcmpi(hKey.Key, 'downarrow') 


30 

n = size(hTable.Data, 1); 


31 

hTable.Data(n+1,:) ={00 false false 

0000}; 

32 

end 


33 

end 


34 

end 
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w 

0 

0 

0 

0 


[3] The 1st, 2nd, 5th, and 6th fields 
are editable numeric fields; you 
can enter data directly. 


[4] The 3rd and 4th fields are 
logical fields; you simply check 
(true) or uncheck (false) a box. 


[5] The 7th and 8th fields are non- 
editable numeric fields. They store 
calculated data. 
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Example08_07b.m: Truss Member Data 

[7] This program uses a Ul-table to input the truss member data such as those listed in Table3.14b (page 157), 
as shown in [8]. This program is similar to Example08_07a.m; you should be able to read by yourself. 

3 5 trus sMemberData 

36 

37 function trussMemberData 

38 Members = struct('nodel', 0, 'node2', 0, 'force', 0); 

39 figure('Position', [30, 30, 260, 200], ... 

40 'Name', 'Member Data', ... 

41 'MenuBar', 'none', ... 

42 'NumberTitle', 'off') 

43 uitable('Data', struct2cell(Members)', ... 

44 'KeyPressFcn', @cbKeyPressMembers, ... 

45 'ColumnName', {'Nodel', 'Node2', 'Force'}, ... 

46 'ColumnEditable', logical([l 1 0]), ... 

47 'ColumnWidth', {60}, ... 

48 'Units', 'normalized', ... 

49 'Position', [.05 .1 .9 .8]); 

50 

51 function cbKeyPressMembers(hTable, hKey) 

52 if strcmpi(hKey.Key, 'downarrow') 

53 n = size(hTable.Data, 1); 

54 hTable.Data(n+1,:) = {0 0 0}; 

55 end 

5 6 end 

5 7 end 


Nodel~ Node2 Rjrce 

1 1 2 0 

2 1 3 0 

3 1 0 


Table 8.7 UI-Table Properties 

Property 

Description 

Position 

Location and size of uitable 

Data 

Table content, a cell array 

CellEditCallback 

Cell edit callback function 

KeyPressFcn 

Key press callback function 

ColumnName 

Column heading names 

ColumnFormat 

Cell display format 

ColumnEditable 

Ability to edit column cells 

ColumnWidth 

Width of table columns 

RowName 

Row heading names 

Parent 

Parent of uitable 

FontSize 

Font size 

Details and More: Help>MATLAB>App Building> GUIDE or Programmatic Workflow> 

Components and Layout>Interactive Components> Uitable Properties 
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8.8 Example: Statically Determinate Trusses (Version 5.0) 


Example08_08.m: Truss 5.0 

[1] This is a GUI version of program to solve statically determinate truss problems, an improved version of 
Example06_08.ru (pages 272-273). With the GUI, you can input truss data, plot the tmss, solve the tmss, and so on, in a 
much more intuitive way, reducing human mistakes (see [6-15], pages 325-326). (Continued at [2], next page.) —» 

1 trussVersion5 

2 

3 function trussVersion5 

4 Nodes = struct('x', 0, ' y' , 0, ... 

5 'supportx', false, 'supporty', false, ... 

6 'loadx', 0, 'loady', 0, ... 

7 'reactionx', 0, 'reactiony', 0); 

8 Members = struct('nodel',0, 'node2',0, 'force',0); 

9 hf = figure('Position', [40, 20, 590, 450], ... 

10 'Name', 'Planar Truss: Untitled', ... 

11 'MenuBar', 'none', ... 

12 'NumberTitle', 'off') 

13 axes('Position', [.05 .05 .475 .575]), axis off 

14 data = struct2cell(Nodes)'; 

15 columnName = {'X', 'Y', 'Supportx', 'SupportY', ... 

16 'LoadX', 'LoadY', 'ReactionX', 'ReactionY'}; 

17 columnFormat = {'numeric', 'numeric', ... 

18 'logical', 'logical', ... 

19 'numeric', 'numeric', 'numeric', 'numeric'}; 

20 columnEditable = logical([l 1111100]); 

21 hNodes = uitable('Data', data, ... 

22 'KeyPressFcn', @cbKeyPressNodes, ... 

23 'ColumnName', columnName, ... 

24 'ColumnFormat', columnFormat, ... 

25 'ColumnEditable', columnEditable, ... 

26 'ColumnWidth', {45 45 60 60 60 60 72 72}, ... 

27 'Units', 'normalized', ... 

28 'Position', [.05 .65 .9 .275]); 

29 hMembers = uitable('Data', struct2cell(Members)', ... 

30 'KeyPressFcn', @cbKeyPressMembers, ... 

31 'ColumnName', {'Nodel', 'Node2', 'Force'}, ... 

32 'ColumnEditable', logical([l 1 0]), ... 

'ColumnWidth', {54, 54, 72}, ... 

34 'Units', 'normalized', ... 

35 'Position', [.55 .325 .4 .275]); 
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[2] Example08_08.m (Continued). (Continued at [3], next page.) —» 

36 uicontrol('Style', 'pushbutton', ... 

37 'String', 'Plot', ... 

38 'Callback', @cbPlot, ... 

39 'Units', 'normalized', ... 

40 'Position', [.55 .225 .175 .075]) 

41 uicontrol('Style', 'pushbutton', ... 

42 'String', 'Solve', ... 

43 'Callback', @cbSolve, ... 

44 'Units', 'normalized', ... 

45 'Position', [.55 .135 .175 .075]) 

46 uicontrol('Style', 'pushbutton', ... 

47 'String', 'Open', ... 

48 'Callback', @cbOpen, ... 

49 'Units', 'normalized', ... 

50 'Position', [.775 .225 .175 .075]) 

51 uicontrol('Style', 'pushbutton', ... 

52 'String', 'Save As', ... 

53 'Callback', @cbSaveAs, ... 

54 'Units', 'normalized', ... 

55 'Position', [.775 .135 .175 .075]) 

56 uicontrol('Style', 'pushbutton', ... 

57 'String', 'Quit', ... 

58 'Callback', 'close', ... 

59 'Units', 'normalized', ... 

60 'Position', [.775 .05 .175 .075]) 

61 uicontrol('Style', 'text', ... 

62 'String', 'Nodal Data', ... 

63 'Units', 'normalized', ... 

64 'Position', [.425 .925 .2 .04]) 

65 uicontrol('Style', 'text', ... 

66 'String', 'Member Data', ... 

67 'Units', 'normalized', ... 

68 'Position', [.65 .6 .2 .04]) 

69 
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[3] Example08_08.m (Continued). (Continued at [4], next page.) —» 


70 

function cbPlot(~, ~) 


71 

Nodes = cell2struct(hNodes.Data, fieldnames(Nodes), 2)' 

1 

72 

Members = cell2struct(hMembers.Data, fieldnames(Members), 2)'; 

73 

plotTruss(Nodes, Members) 


74 

end 


75 



76 

function cbSolve(~, ~) 


77 

Nodes = cell2struct(hNodes.Data, fieldnames(Nodes), 2)' 

r 

78 

Members = cell2struct(hMembers.Data, fieldnames(Members), 2)'; 

79 

[Nodes, Members] = solveTruss(Nodes, Members); 


80 

hNodes.Data = permute(struct2cell(Nodes), [1 3 2])'; 


81 

hMembers.Data = permute(struct2cell(Members), [1 3 2])' 

r 

82 

end 


83 



84 

function cbOpen(~, ~) 


85 

[file, path] = uigetfile('*.mat'); 


86 

if file 


87 

Nodes = []; Members = []; 


88 

load([path, file]) 


89 

hNodes.Data = permute(struct2cell(Nodes), [1 3 2])' 

r 

90 

hMembers.Data = permute(struct2cell(Members), [1 3 

2 ] ) ' ? 

91 

hf.Name = ['Planar Truss: ', file]; 


92 

end 


93 

end 


94 



95 

function cbSaveAs(~, ~) 


96 

[file, path] = uiputfile('*.mat'); 


97 

if file 


98 

Nodes = ce!12struct(hNodes.Data, fieldnames(Nodes), 

2)'; 

99 

Members = ce!12struct(hMembers.Data, fieldnames(Members), 2)'; 

100 

save([path, file], 'Nodes', 'Members') 


101 

hf.Name = ['Planar Truss: ', file]; 


102 

end 


103 

end 


104 



105 

function cbKeyPressNodes(hTable, hKey) 


106 

if strcmpi(hKey.Key, 'downarrow') 


107 

n = size(hTable.Data, 1); 


108 

hTable.Data(n+1,:) ={00 false false 000 0}; 


109 

end 


110 

end 


111 



112 

function cbKeyPressMembers(hTable, hKey) 


113 

if strcmpi(hKey.Key, 'downarrow') 


114 

n = size(hTable.Data, 1); 


115 

hTable.Data(n+1,:) = {0 0 0}; 


116 

end 


117 

end 


118 

end 


119 






8.8 Example: Statically Determinate Trusses (Version 5.0) 323 


[4] Example08_08.m (Continued). (Continued at [5], next page.) —» 

120 function [outNodes, outMembers] = solveTruss(Nodes, Members) 

121 n = size(Nodes,2); m = size(Members,2); 

122 if (m+3) < 2*n 

123 disp('Unstable!') 

124 outNodes = 0; outMembers = 0; return 

125 elseif (m+3) > 2*n 

126 disp('Statically indeterminate!') 

127 outNodes = 0; outMembers = 0; return 

128 end 

129 A = zeros(2*n, 2*n); loads = zeros(2*n,1); nsupport = 0; 

130 for i = lsn 

131 for j = Ism 

132 if Members(j).nodel == i || Members(j).node2 == i 

133 if Members(j).nodel == i 

134 nl = i; n2 = Members(j).node2; 

135 elseif Members(j).node2 == i 

136 nl = i; n2 = Members(j).nodel; 

137 end 

138 xl = Nodes(nl).x; yl = Nodes(nl).y; 

139 x2 = Nodes(n2).x; y2 = Nodes(n2).y; 

140 L = sqrt((x2-xl) A 2+(y2-yl) A 2); 

141 A(2*i-l,j) = (x2-xl)/L; 

142 A(2*i, j) = (y2-yl)/L; 


if (Nodes(i).supportx == 1) 
nsupport = nsupport+1; 

A(2*i-l,m+nsupport) = 1; 

end 

if (Nodes(i).supporty == 1) 
nsupport = nsupport+1; 

A(2*i, m+nsupport) = 1; 

end 

loads(2*i-l) = -Nodes(i).loadx; 
loads(2*i) = -Nodes(i).loady; 

end 

forces = A\loads; 
for j = Ism 

Members(j).force = forces(j); 

end 

nsupport = 0; 
for i = lsn 

Nodes(i).reactionx = 0; 

Nodes(i).reactiony = 0; 
if (Nodes(i).supportx == 1) 
nsupport = nsupport+1; 

Nodes(i).reactionx = forces(m+nsupport); 

end 

if (Nodes(i).supporty == 1) 
nsupport = nsupport+1; 

Nodes(i).reactiony = forces(m+nsupport); 


outNodes = Nodes; outMembers 
disp('Solved successfully.') 
end 


Members; 
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[5] Example08_08.m (Continued). —» 


177 

function plotTruss(Nodes, Members) 


178 

if ( size ( fieldnames(Nodes ) , 1)<6 || size ( fieldnames(Members ) , 1)<2 ) 

179 

disp( ' Truss data not complete'); return 


180 

end 


181 

n = length(Nodes ); m = length(Members ); 


182 

minX = Nodes(l).x; maxX = Nodes(l).x; 


183 

minY = Nodes(l).y; maxY = Nodes(l).y; 


184 

for k = 2:n 


185 

if (Nodes(k).x < minX) minX = Nodes(k).x; 

end 

186 

if (Nodes(k).x > maxX) maxX = Nodes(k).x; 

end 

187 

if (Nodes(k).y < minY) minY = Nodes(k).y; 

end 

188 

if ( Nodes(k).y > maxY) maxY = Nodes(k).y; 

end 

189 

end 


190 

rangeX = maxX-minX; rangeY = maxY-minY; 


191 

axis ( [minX-rangeX/5 , maxX+rangeX/5 , minY-rangeY/5 , maxY+rangeY/5 ]) 

192 

ha = gca; delete(ha.Children) 


193 

axis equal off 


194 

hold on 


195 

for k = l:m 


196 

nl = Members ( k).nodel ; n2 = Members ( k ). node2 ; 

197 

x = [Nodes ( nl ) .x, Nodes(n2 ) .x] ; 


198 

y = [Nodes ( nl ) .y. Nodes ( n2 ) .y ]; 


199 

plot(x,y,'k-o ', 'MarkerFaceColor ', 'k') 


200 

end 


201 

for k = l:n 


202 

if Nodes(k).supportx 


203 

x = [Nodes(k).x, Nodes(k).x-rangeX/20, 

Nodes(k).x-rangeX/20, Nodes(k),x]; 

204 

y = [Nodes(k).y, Nodes(k).y+rangeX/40, 

Nodes(k).y-rangeX/40, Nodes(k).y]; 

205 

plot(x,y,'k-') 


206 

end 


207 

if Nodes(k).supporty 


208 

x = [Nodes(k).x, Nodes(k).x-rangeX/40 , 

Nodes(k).x+rangeX/40, Nodes(k).x]; 

209 

y = [Nodes(k).y, Nodes(k).y-rangeX/20 , 

Nodes(k).y-rangeX/20, Nodes(k).y]; 

210 

plot(x,y,'k-') 


211 

end 


212 

end 


213 

end 
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□ Planar Truss: Untitled 


^jajxj 



[11] The reaction forces 
are displayed here. 
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HZHEE 




□ Planar Trass: trass21 .mat 


-ini x| 


Nodal Data 

X Y SupportX SupportY LoadX LoadY ReactionX ReactionY 

1 0 0 17 17 0 0 0 0 d 

2 5 0 r r 0 -5000 0 0 | 

3 10 0 r r 0 -5000 0 0 

4 15 0 r r 0 -5000 0 0 

5 20 0 r r 00 0 0 

0 0 0 0 jd 
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1 1 2 0 _d 

in 2 3 »□ 

3 3 ♦ 0 

4 4 5 0 
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6 6 7 0 _d 
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Solve Save As 


Quit 


Nodal Data 



Solve | Save As 


Quit 
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8.9 GUIDE: Graphical User Interface Development 
Environment 


PLOTS APPS SHORTCUTS 



GUIDE Quick Start 


Create New GUI j Open Existing GUI | 
GUIDE templates Preview 


• Blank GUI (Default) 


4 GUI with Uicontrols 
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|~ Save new figure as: [* *~ 
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1 

global hf Nodes 

Members 

2 

hf = hObject; 


3 

Nodes = struct( 

'x' f 0 f 'y' f 0 f ... 

4 

'supportx', 

false, 'supporty', false, ... 

5 

'loadx', 0, 

'loady', 0, ... 

6 

'reactionx' 

, 0, 'reactiony', 0); 

7 

Members = struct('nodel', 0, 'node2', 0, 'force ', 0); 




8 axis off 
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^jnjxj 
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CreateFcn 


KeyPressFcn 


g* Table Properly Editor 


*J 


Columns 

Rows 

Data 

Colors 


Columns 


t Fonnat impacts how data is displayed m the table. A discrepancy between the selected format and the underlying data type may result 
1 in a conflict during cell editing. Click here for more information. 


Column Headers 
C Do not show column headers 


C Show numbered column headers 

<• Show names entered below as the column headers: 


Column Definitions 
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Name 
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Copy 
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t ^ 

4 Down 


o Edit... 


OK 


Cancel 


Apply Help 


4 




9 global hNodes 

10 hNodes = hObject; 


11 

if strcmpi(eventdata Key, 

'downarrow') 

12 

n = size(hObject Data, 

i); 

13 

hObject.Data(n+1) = 

{0 0 false false 000 0}; 

14 

end 
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CreateFcn 


KeyPressFcn 


^ Table Property Editor 


XJ 


Columns 


i Format impacts how data is displayed in the table. A discrepancy between the selected format and the underlying data type may result 
in a conflict during cell editing. Click here for more information. 


Column Headers 
C Do not show column headers 
r Show numbered column headers 
(• Show names entered below as the column headers: 


Column Definitions 


Apply 


# 

Name 

Auto Width 
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Editable 
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o Edit... 
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4 




15 global hMembers 

16 hMembers = hObject; 


* 


17 

if strcmpi(eventdata.Key, 

'downarrow 1 ) 

18 

n = size(hObject Data, 

in¬ 

19 

hObject.Data(n+1,:) = 

fo 0 0}; 

20 

end 
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Callback 

4 

Automatic 


21 global Nodes Members hNodes hMembers 

22 Nodes = cell2struct(hNodes.Data, fieldnames(Nodes), 2)'; 

23 Members = cell2struct(hMembers.Data, fieldnames(Members), 2)'; 

24 plotTruss(Nodes, Members) 
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25 global Nodes Members hNodes hMembers 

26 Nodes = cell2struct(hNodes.Data, fieldnames(Nodes), 2)'; 

27 Members = cell2struct(hMembers.Data, fieldnames(Members), 2)'; 

28 [Nodes, Members] = solveTruss(Nodes, Members); 

29 hNodes.Data = permute(struct2cell(Nodes), [1 3 2])'; 

30 hMembers.Data = permute(struct2cell(Members), [1 3 2])'; 


31 global Nodes Members hNodes hMembers hf 

32 [file, path] = uigetfile('*.mat'); 

33 if file 

34 Nodes = []; Members = []; 

35 load([path, file]) 

36 hNodes.Data = permute(struct2cell(Nodes), [1 3 2])'; 

37 hMembers.Data = permute(struct2cell(Members), [1 3 2])'; 

38 hf.Name = ['Planar Truss: ', file]; 

39 end 


40 global Nodes Members hNodes hMembers hf 

41 [file, path] = uiputfile('*.mat'); 

42 if file 

43 Nodes = cell2struct(hNodes.Data, fieldnames(Nodes), 2)'; 

44 Members = cell2struct(hMembers.Data, fieldnames(Members), 2)'; 

45 save([path, file], 'Nodes', 'Members') 

46 hf.Name = ['Planar Truss: ', file]; 

47 end 
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R Example08_09 
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Design View Code View 
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Inspector | Callbacks 
▼ APPEARANCE 
Name 


Color 

▼ PLOTTING 
NextPtot 
Colormap 

▼ POSITION 
Position 


Ul Figure 

[0.94,0.94,0.94] ?: 


40,20,590,450 
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Design View Code View 


Column 1 Column 2 Column 3 Column 4 


0.8 

0.6 

0.4 

0.2 


Title 


0 --*---■ 

0 0.2 0.4 0.6 0.8 1 

X 


▼ COMPONENT BROWSER 

- app.UIFigure 
app.UIAxes 
app.UITable 


UfTABLE PROPERTIES 


Configuration | Callbacks 
~ COLUMNS 


Column 1 
Column 2 
Column 3 

Column 4 



► More Properties 

FONT 


Name 

Size 


Helvetica 


12 -J 




UfTABLE PROPERTIES 


Configuration | Callbacks 
▼ COLUMNS 



▼ Fewer Properties 

Name |x 

Width O Automatic 

O 45 i pixels 

□ Editable 



Column 

Name 

Width 

Editable 

Column 1 

X 

45 

Yes 

Column 2 

Y 

45 

Yes 

Column 3 

SupportX 

60 

Yes 

Column 4 

SupportY 

60 

Yes 

Column 5 

LoadX 

60 

Yes 

Column 6 

LoadY 

60 

Yes 

Column 7 

ReactionX 

72 

No 

Column 8 

ReactionY 

72 

No 
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0 0.2 0.4 0.6 0.8 1 Width O Automatic 

X - 

° 54 ptxets 

Q Editable 


Column 

Name 

Width 

Editable 

Column 1 

Nodel 

54 

Yes 

Column 2 

Node2 

54 

Yes 

Column 3 

Force 

72 

No 
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Design View 



COMPONENT BROWSER 

app.UIFigure 
app.UIAxes 
app.UITabie 
app.UITabie: 
app.PtotButton 
appSotveButton 
app.Open Button 
app SaveAsButton 
appQuitButton 


BUTTON PROPERTIES 


Configuration | Callbacks 
- TEXT & ICON 
Text 


Quit 


- 0 = 

► More Properties 


Name 

Helvetica w 

Size 

12 - 

Style 

B 1 

Color 

■ ' 


Design View Code View 




Open 


0.4 0.6 

X 


Solve | Save As | 

| Quit | 


▼ COMPONENT BROWSER 

app.UIFigure 
app.UIAxes 
app.UITabie 
app.UITabie: 
app.PtotButton 
app.SotveButton 
app.Open Button 
app. SaveAs Button 
app.QuitButton 
app. Button 
app.Button_2 
app.Button_3 
app.Button_4 


BUTTON PROPERTIES 


Configuration | Callbacks 
- TEXT & ICON 
Text r 


»(•)’ 

► More Properties 


FONT 

Name 

Size 


Helvetica 

i 


12 
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Design View Code View 


aSBSPtliHgte 


SupportX SupportY LoadX LoadY ReactionX ReactionY 


1 

0.8 

0.6 

0.4 

0.2 


Title 


0 - - - - --- - -- 

0 0.2 0.4 0.6 0.8 1 

X 



Plot | | Open 

Solve | | Save As 

| Quit 


0 

0 

0 

0 


▼ COMPONENT BROWSER 

- app.UIFigure 
app.UIAxes 
app.UITable 
app.UITable2 
app.PlotButton 
app.Soh/eButton 
app.OpenButton 
app.SaveAs Button 
app.QuitButton 
app. Button 
app.Button_2 
app.Button_3 
app.Button_4 
app.NodalDataLabel 


▼ LABEL PROPERTIES 
Configuration | Callbacks 



- FONT 


Name Helvetica 

Size 12 " 


Design View Code View 






Open 


0.2 0.4 0.6 

X 


▼ COMPONENT BROWSER 

▼ app.UIFigure 
app.UIAxes 
app.UITable 
app.UITab»e2 
app.PlotButton 
app.SotveButton 
app Open Button 
app.SaveAs Button 
app.QuitButton 
app. Button 
app.Button_2 
app.Button_3 
app.Button_4 
app.NodalDataLabel 
app.MemberDataLabel 


▼ LABEL PROPERTIES 
Configuration | Callbacks 


TEXT 




i 

Text 


Member Data 

“1 



(5- - 


1 

FONT 





Name 


Helvetica 



Size 


H ' 










































































8.10 App Designer 345 


▼ COMPONENT BROWSER 

app. U Figure 
app.UIAxes 
app.UITable 
app.UITable2 
app.PlotButton 
app.SolveButton 
app.Open Button 
app. SaveAs Button 
app.QuitButton 
app. Button 
app.Button_2 
app.Button_3 
app.Button_4 
app. NodalDataLabel 
app.MemberDataLabel 


▼ Ul FIGURE PROPERTIES 


Configuration | Callbacks 


StartupFcn 

CloseRequestFcn 

SizeChangedFcn 


£ r rarre ~ 

<add StartupFcn callback> 

▼ 




StartupFcn: Code that executes after 
component creation 

% Code that executes after component creation 

function startupFcn(app) 
global Nodes Members 
Nodes = struct('x' f 0, 'y', 0, ... 

'supportx', false, 'supporty', false, ... 

'loadx' # Q, 'loady' ,0, ... 

' reactionx', 0, ' reactiony', 0); 

Members = struct( 'nodel' , 0, 'node2', 0, 'force', 0); 

app.UIAxes.Visible = 'off'; 

app.UITable.Data ={00 false false 0000}; 

app.UITable2.Data ={00 0}; 


end 
















346 Chapter 8 Graphical User Interfaces 


t> 

Run 


E 


UI Figure 


^JxJ 


Nodal Data 


X 

Y SupportX 

SupportY LoadX 

LoadY 

ReactionX ReactionY 


0 

0 □ 

o 

o 

□ 

o| 0 



0 

0 


Member Data 


Nodel 

Node2 

Force 

0 

0 

0 


0 

0 


Plot ) 

[ Open | 



Solve 

Save As 


Quit 



Design View Code View 


Nodal Data 

SupportX SupportY LoadX LoadY ReactionX ReactionY 


Title 

1 

0.8 

0.6 

0.4 

0.2 

0 ---*-*-— 

0 0.2 0.4 0.6 0.8 

X 


Member Data 



Plot l Open 

Solve Save As 

| Quit 


n 

o 

G 

0 

G 


▼ COMPONENT BROWSER 

app.UIFigure 
app.UIAxes 
app.UITable 
app.UITaWe2 
app.PtotButton 
appSoiveButton 
app.OpenButton 
app. SaveAs Button 
app.QuitButton 
app. Button 
app.Button_2 
app.Button_3 
app.Button_4 
app.NodalDataLabel 
app.MemberDataLabel 


r BUTTON PROPERTIES 


Configuration | Callbacks 

ButtonPushedFcn ^ | c 

<add ButtonPushedFcn callback 


ButtonPushedFcn: Code to execute when app 
user clicks button 
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% Button pushed function: Button 
function ButtonPushed(app, gygjxf) 

n = size(app.UITable.Data, 1); 

app.UITable.Data(n+l,:) ={00 false false 000 0}; 

end 

end 


!> 

Run 




Nodal Data 


0 

0 

0 

0 


SupportX SupportY LoadX LoadY ReactionX ReactionY 


0 

0 o] 

0 

0 0 

0 

o[ ~o| 

Member Data 

Nodel 

Node2 Force 

0 

0 0 


Plot | Open 


Solve | Save As 


( Quit ) 


% Button pushed function: Button_2 
function Button_2Pushed(app, 

n = size(app.UITable.Data r 1); 
if n > 1 

app.UITable.Data(n,:) = []; 

end 

end 


end 
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Design View Code View 


Nodal Data 




Open 


0.2 0.4 0.6 0.8 

X 


| Quit 


▼ COMPONENT BROWSER 

app.U I Figure 
app.UIAxes 
app.U ITabte 
app.UITableZ 
app.PtotButton 
app. Solve Button 
app O pen Button 
app.SaveAs Button 
app.Quit Button 
app. Button 
appButton_2 
app.Button_3 
app.Button_4 
app.NodalData Label 
app. MemberData Label 


▼ BUTTON PROPERTIES 

| Configuration | Callbacks 

ButtonPushedFcn 

- 

<add ButtonPushedFcn callback> 

ButtonPushed 

Button_2Pushed 




ButtonPushedFcn: Code to execute when app 
user clicks button 


% Button pushed function: Button_3 

function Button_3Pushed(app, 

m = size(app.UITable2.Data / 1); 
app.UITable2.Data(m+l / : ) = {0 Q 0}; 

end 

end 



% Button pushed function: Button_4 
function Button_4Pushed(app, §y&Bjk) 
m = size(app.UITable2.Data / 1); 
if m > 1 

app.UITable2.Data(m,:) = []; 

end 

end 


end 
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t> 

Run 


□ UI Figure 


^injxj 


Nodal Data 


X 

Y 

SupportX 

SupportY 

LoadX 

LoadY 

ReactionX 

ReactionY 


1 

1 







0 

o 

o 

o 

0 

0 


0 

0 


✓ 



✓ 


0 0 

0 

0 

2 

0 





✓ 

0 0 

0 

0 


Member Data 


Nodel 

Node2 

Force 

1 

2 

0 

1 

3 0 

2 

~J\ 0 



0 

0 

0 

0 


Plot 

Open 



Solve ) 

Save As 


Quit 


Example08_10mlapp x 


Callbacks | Functions | Properties 
<$> Function ▼ 


Private Function 
Public Function 


your code into helper or 
fiction with app as the first 


▼ APPLAYOUT 


1 

2 

3 

4 

5 - 

6 - 

7 - 

8 - 
9 - 

10 - 
11 - 
12 - 

13 - 

14 - 

15 - 

16 - 

17 - 

18 - 

19 - 

20 - 
21 
22 

23 

24 

25 

26 - 

27 - 

28 

29 

30 

31 - 

32 - 


|classdef Example08_10 < matlab.apps.AppBase 

% Properties that correspond to app components 


properties (Access = 
UIFigure 
UIAxes 
UITable 
UITable2 
PlotButton 
SolveButton 
OpenButton 
SaveAsButton 
QuitButton 
Button 
Button_2 
Button_3 
Button_4 
NodalDataLabel 
MemberDataLabel 
end 


public) 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 

matlab.ui. 


Figure 

control. 

control, 

control. 

control. 

control. 

control. 

control. 

control. 

control. 

control. 

control, 

control. 

control. 

control, 


UIAxes 

Table 

Table 

Button 

Button 

Button 

Button 

Button 

Button 

Button 

Button 

Button 

Label 

Label 


methods (Access = private) 

% Code that executes after component creation 
function startupFcn(app) 
global Nodes Members 
Nodes = struct('x', 0, 'y', 0, ... 

'supportx', false, 'supporty', false, ... 

'loadx' , 0, 'loady' , 0, ... 

'reactionx', 0, 'reactiony 1 , 0); 

Members = struct(' nodel' , 0, 'node2', 0, 'force', 0) 
app.UIAxes.Visible = 'off'; 
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methods (Access = private) 

function = func|Upp) 

end 


end 


function plotTruss(app, Nodes, Members) 

if (size(fieldnames(Nodes),1)<6 || size(fieldnames(Members),1)<2) 
disp('Truss data not complete'); return 

end 

n = length(Nodes); m = length(Members); 
minx = Nodes(l).x; maxX = Nodes(l).x; 
minY = Nodes(l).y; maxY = Nodes(l).y; 
for k = 2:n 

if (Nodes(k).x < minX) minX = Nodes(k).x; end 

if (Nodes(k).x > maxX) maxX = Nodes(k).x; end 

if (Nodes(k).y < minY) minY = Nodes(k).y; end 

if (Nodes(k).y > maxY) maxY = Nodes(k).y; end 


end 

rangeX = maxX-minX; rangeY = maxY-minY; 

axis(app.UIAxes, [minX-rangeX/5, maxX+rangeX/5, minY-rangeY/5, maxY+rangeY/5]) 

delete(app.UIAxes.Children) 

axis(app.UIAxes, 'equal', 'off'), title(app.UIAxes, ' ') 

hold(app.UIAxes, 'on') 

for k = Ism 

nl = Members(k).nodel; n2 = Members(k).node2; 
x = [Nodes(nl).x. Nodes(n2).x]; 
y = [Nodes(nl).y. Nodes(n2).y]; 

plot(app.UIAxes, x,y,'k-o', 'MarkerFaceColor', 'k') 

end 

for k = lsn 

if Nodes(k).supportx 

x = [Nodes(k).x, Nodes(k).x-rangeX/20, Nodes(k).x-rangeX/20, Nodes(k).x] 
y = [Nodes(k).y, Nodes(k).y+rangeX/40, Nodes(k).y-rangeX/40, Nodes(k).y] 
plot(app.UIAxes, x,y,'k-') 


end 

if Nodes(k).supporty 

x = [Nodes(k).x, Nodes(k).x-rangeX/40, Nodes(k).x+rangeX/40, 
y = [Nodes(k).y, Nodes(k).y-rangeX/20, Nodes(k).y-rangeX/20, 
plot(app.UIAxes, x,y,'k-') 


Nodes(k).x] 
Nodes(k).y] 


end 

end 


end 
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function [outNodes, outMembers] = solveTruss(app, Nodes, Members) 
n = size(Nodes,2); m = size(Members,2); 
if (m+3) < 2*n 

disp('Unstable!') 

outNodes = 0; outMembers = 0; return 
elseif (m+3) > 2*n 

disp('Statically indeterminate!') 
outNodes = 0; outMembers = 0; return 

end 

A = zeros(2*n, 2*n); loads = zeros(2*n,1); nsupport = 0; 
for i = lsn 

for j = l:m 

if Members(j).nodel == i || Members(j).node2 == i 
if Members(j).nodel == i 

nl = i; n2 = Members(j).node2; 
elseif Members(j).node2 == i 

nl = i; n2 = Members(j).nodel; 

end 

xl = Nodes(nl).x; yl = Nodes(nl).y; 
x2 = Nodes(n2).x; y2 = Nodes(n2).y; 

L = sqrt((x2-xl) A 2+(y2-yl) A 2); 

A( 2*i-l,j) = (x2-xl)/L; 

A(2*i, j) = (y2-yl)/L; 

end 

end 

if (Nodes(i).supportx == 1) 
nsupport = nsupport+1; 

A(2 *i-1,m+nsupport) = 1; 

end 

if (Nodes(i).supporty == 1) 
nsupport = nsupport+1; 

A(2*i, m+nsupport) = 1; 

end 

loads(2*i-l) = -Nodes(i).loadx; 
loads(2*i) = -Nodes(i).loady; 

end 

forces = A\loads; 
for j = l:m 

Members(j).force = forces(j); 

end 

nsupport = 0; 
for i = lsn 

Nodes(i).reactionx = 0; 

Nodes(i).reactiony = 0; 
if (Nodes(i).supportx == 1) 
nsupport = nsupport+1; 

Nodes(i).reactionx = forces(m+nsupport); 

end 

if (Nodes(i).supporty == 1) 
nsupport = nsupport+1; 

Nodes(i).reactiony = forces(m+nsupport); 

end 

end 

outNodes = Nodes; outMembers = Members; 

disp('Solved successfully.') 

end 
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▼ COMPONENT BROWSER 

app.UIFigure 
app. Ul Axes 
app.UITabte 
app.UITabte2 
app.PlotButton 
app.SolveButton 
app.Open Button 
app.SaveAs Button 
app.QuitButton 
app. Button 
app.Button_2 
app.Button_3 
app.Button_4 
app.NodalDataLabel 
app. MemberDataLabel 


r BUTTON PROPERTIES 


Configuration | Callbacks 


Button PushedFcn 


▼ 

<add ButtonPushedFcn callback> 

ButtonPushed 

Button_2Pushed 

Button_3Pushed 

Button_4Pushed 


ButtonPushedFcn: C 

user clicks button 



% Button pushed function: PlotButton 
function PlotButtonPushed(app, event) 
global Nodes Members 

Nodes = cell2struct(app.UITable.Data, fieldnames(Nodes), 2)'; 
Members = cell2struct(app.UITable2.Data, fieldnames(Members), 2)' 
plotTruss(app, Nodes, Members) 

end 

end 


% Button pushed function: SolveButton 
function SolveButtonPushed(app, § v Y&&t) 
global Nodes Members 

Nodes = cell2struct(app.UITable.Data, fieldnames(Nodes), 2)'; 
Members = cell2struct(app.UITable2.Data, fieldnames(Members), 2)'; 
[Nodes, Members] = solveTruss(app, Nodes, Members); 
app.UITable.Data = permute(struct2cell(Nodes), [1 3 2])'; 
app.UITable2.Data = permute(struct2cell(Members), [1 3 2])'; 
end 


end 
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% Button pushed function: OpenButton 

function OpenButtonPushed(app, event) 
global Nodes Members 
[file, path] = uigetfile( 1 + .mat 1 ); 
if file 

Nodes = []; Members = []; 
load([path, file]) 

app.UITable.Data = permute(struct2cell(Nodes), [1 3 2])'; 
app.UITable2.Data = permute(struct2cell(Members), [1 3 2])'; 
app.UIFigure.Name = ['Planar Truss: ' r file]; 
end 


end 


end 




% Button pushed function: SaveAsButton 
function SaveAsButtonPushed(app, gygpt) 
global Nodes Members 
[file, path] = uiputfile( + .mat'); 
if file 

Nodes = cell2struct(app.UITable.Data, fieldnames(Nodes), 2)'; 
Members = cell2struct(app.UITable2.Data, fieldnames(Members), 2)'; 
save([path, file], 'Nodes', Members') 
app.UIFigure.Name = [ Planar Truss: ', file]; 
end 


end 




^ Button pushed function: QuitButton 
function QuitButtonPushed(app, event) 


close(app.UIFigure) 

end 


end 
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Planar Trass: Datafile08 10a mat 


0 

0 


0 

0 


Member Data 



Nodel 

Node2 

Force 

1 

2 

-707.1068 

1 

3 

-707.1068 

2 

3 

500 


C 


Plot 


Open 


Solve | Save As 


Nodal Data 

— 


X 

Y 

SupportX 

SupportY 

LoadX 

LoadY 

ReactionX 

ReactionY 

1 

1 

u 

u 

0 

-1000 

0 

0 

0 

0 

0 

0 

0 

0 

0 

500 

2 

0 

□ 

0 

0 

0 

0 

500 


Quit | 



Planar Trass: Datafile08_10b.mat 


JDJxJ 


Nodal Data 


X 

Y SupportX 

SupportY 

LoadX 

LoadY 

ReactionX 

ReactionY 

0 

0 

✓ 



✓ 


0 

0 

3.8995e-12 

1.2500e+04 

5 

0 






0 

-5000 

0 

0 

10 

0 






0 

-5000 

0 

0 

15 

0 






0 

-5000 

0 

0 

20 

0 






0 

0 

0 

0 

_-_CZI_ 

_□_- 







Member Data 


Nodel 

Node2 Force 

1 

2 2.3437e+04 

2 

3 2.3437e+04 

3 

4 1.7813e+04 

4 

5 1.3125e+04 

5 

6 1.4062e+04 


Quit 


0 

0 

0 

0 


Plot | Open 


Current Folder 


Name 


Q 

* 

© 

* 

* 

* 

© 

* 

* 

Q 

© 

© 


Example08_ 

Example08_ 

Example08_ 

Example08. 

Example08_ 

Example08_ 

Example08_ 

Example08_ 

Example08_ 

Example08_ 

Example08_ 

Example08_ 


Ola.m 
Olb.m 
02. m 
03.m 
04 .m 
.05 .m 
06 .m 
07a.m 
07b.m 
08 .m 
09 .fig 
09.m 


Example08_l 0 .mlapp 
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classdef Example08_10 

properties (Access = public) 
UIFigure 


end 

methods (Access = private) 
function solveTruss 


function plotTruss 


end 

methods (Access = private) 
function startupFcn 


function ButtonPushed 


function Button 2Pushed 


function Button 3Pushed 


function Button 4Pushed 


function OpenButtonPushed 

function PlotButtonPushed 


function QuitButtonPushed 


function SaveAsQuitButtonPushed 


function SolveButtonPushed 


end 

methods (Access = private) 

function createComponents(app) 


end 

methods (Access = public) 

function app = Example08_10 


function delete 


end 


end 
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8.11 Additional Exercise Problems 



o 1 


2 3 4 5 

xio 4 


















Chapter 9 

Symbolic Mathematics 


MATLAB can process not only 
numeric data but also symbolic 
expressions. To use symbolic 
mathematics, you need a 
license that includes Symbolic 
Math Toolbox. This chapter 
assumes that you have a license 
that includes Symbolic Math 
Toolbox. 


9.1 Symbolic Numbers, Variables, Functions, and Expressions 358 

9.2 Simplification of Expressions 364 

9.3 Symbolic Differentiation: Curvature of a Curve 367 

9.4 Symbolic Integration: Normal Distributions 370 

9.5 Limits 372 

9.6 Taylor Series 374 

9.7 Algebraic Equations 376 

9.8 Inverse of Matrix: Hookes's Law 379 

9.9 Ordinary Differential Equations (ODE) 381 

9.10 Additional Exercise Problems 387 
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9.1 Symbolic Numbers, Variables, Functions, and 
Expressions 


Example09_01a.m: Basic Concepts 

[2] Type the following commands and save as 
Example09_01a.m. These commands demonstrate the 
creation of symbolic numbers, symbolic variables, and 
symbolic expressions, using the functions sym. 

1 clear 

2 a = sym(2/3) 

3 b = sym('2/3') 

4 isequal(a, b) 

5 sym(pi) 

6 x = sym('y') 

7 x A 2 

8 x = sym('c')+sym('y') 

9 x A 2 

10 x = sym('x') 

11 p = x"2+2*x+3 

12 q = diff(p) 


Current Folder 


Name 


Example09_01a.m 


Open 


Example09_01a.m 


Open as Live Script 


Show Details 1 

Run 

OF7 

View Help 

Show in Finder 

FI 

Create Zip File 

Rename 

<5 

Delete 


Compare Selected Files/Folders 

Compare Against 

► 

Cut 

3€X 

Copy 

3€C 

Paste 

>/ Indicate Files Not on Path 

&V 


v 
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Workspace 

Name a 

Value 

SH a 

lxl sym 

i®j ans 

lxl sym 

®b 

lxl sym 

Hip 

lxl sym 

i®lq 

lxl sym 

Hlx 

lxl sym 
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Example09_01b.m: Symbolic Expressions 

[8] As exercises, let's create the following expressions: —» 


/ = - 


^COS0 


sin 


30 
0 + 1 


g = ax 3 +bx + c 

, d ;— r 1 Ox + 3 

h — — \5x + 3x + 7 —— I 

dx 2V5x 2 + 3x + 7 


AT = 


5 sin/ -cos/ 2 
cos 2/ -sin/- 


(a) 

(b) 

(c) 

(d) 


13 clear 

14 syms theta 

15 f = 8*cos(theta)/sin((3*theta)/(theta+1)) 

16 syms a b c x 

17 g = a*x A 3+b*x+c 

18 h = diff (sqrt(5*x /v 2+3*x+7) ) 

19 syms t 

20 M = [5*sin(t),-cos(t A 2);cos(2*t),-sin(t)] 

21 class(M) 

22 size(M) 

23 det(M) 
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B Live Editor - Example09_01b.mlx * _ 0x 


Example09_01b.mlx * X + 
clear 

syms theta 

f = 8*cos(theta)/sin((3*theta)/(theta+l)) 
f = 


8 cos(0) 



syms a b c x 
g = a*x /v 3+b*x+c 

g = ax 3 + bx + c 
h = diff(sqrt(5*x~2+3*x+7)) 
h = 

10x + 3 

2 VSxt + Sx + l 
syms t 

M = [5*sin(t),-cos(t~2);cos(2*t),-sin(t)l 
M = 

5sin(f) -cos(f 2 )\ 
cos(2/) -sin(/) ) 

class(M) 
ans = 'sym' 
size(M) 
ans = 

2 2 
det(M) 
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/ \ 

Example09_01c.m: Symbolic Functions 

[11] Following commands demonstrate the creation and 
the use of symbolic functions. 

24 clear 

25 syms x y 

26 f(x,y) = x A 3*y / '2 

27 class(f) 

28 f(2,3) 

29 clear 

30 syms f(x,y) 

31 f(x,y) = x"3*y"2 

32 diff(f) 

33 diff(f,y) 

34 syms a b 

35 g = f(a+1,b+1)/(a+b) 

36 h = f + x A 2 + y 

37 f(x,y) = sin(x*y) 

38 f = sin(x*y) 

39 class(f) 

V_ J 


Workspace 

© 

1 Name a 

Value 


a 

lxl sym 


ans 

’sym' 


b 

lxl sym 


f 

lxl sym 


g 

lxl sym 


h 

lxl symfun 

L* 

X 

lxl sym 

£1 

V 

lxlsym 


0 Live Editor - Example09_01c.mlx * 


Example09_01c.mlx * X 1 + 


clear 
syms x y 

f(x,y) = x~3*y~2 

f(x, y) = X 3 / 
class(f) 
ans = 'symfun' 
f(2,3) 


® x 


ans = 72 
clear 

syms f(x,y) 
f(x,y) = x'~3*y^2 

f(x, y) = x*y 2 
diff(f) 


ans(x, y) = 3 x 2 y 2 
diff(f,y) 


ans(x, y) = 2x* y 
syms a b 

g = f (a+l,b+l)/(a+b) 

9 = 

( fl+1 ) 3 ( b + 1 )' 

a + b 

h = f + x~2 + y 

h(x, y) = x i y 2 + x 2 +y 
X(x,y) = sin(x*y) 
f(x, y) = sin (at y) 
f = sin(x*y) 
f = sin(xy) 
class(f) 
ans = 'sym' 
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Table 9.1 Creation of Symbolic Constant, Variables, and Functions 

Functions 

Description 

syms vl v2 ... 

Create symbolic variables and functions 

s = sym(string) 

Create symbolic constants, variables, and functions. 

s = sym(number) 

Create symbolic constants, variables, and functions. 

v = symvar(s,n) 

Return n variables closest to x 

Details and More: Help>Symbolic Math Toolbox>Symbolic Computations in MATLAB>Symbolic Variables, 
Expressions, Functions, and Preferences>Create Symbolic Variables, Expressions, and Functions 
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9.2 Simplification of Expressions 


Example09_02a.m: Simplification of 
Expressions 

[2] The following commands demonstrate the use of some 
simplification functions. 

1 clear 

2 syms x y a b 

3 f = (x+a) A 2*(y+b) 

4 g = expand(f) 

5 h = factor(g) 

6 prod(h) 

7 collect(g) 

8 collect(g, y) 

9 collect(g, [a b]) 

10 simplify(g) 

11 simplify(sin(x) A 2+cos(x) A 2) 

12 simplify ( (x /v 2+2*x+l)/(x+1) ) 

v_ J 
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f \ 

Example09_02b.m: combine 

[5] The following commands demonstrate the use of the 
function combine to simplify expressions. They also 
show the use of the function assume to set assumptions 
on symbolic variables. 

13 clear 

14 syms x y 

15 combine(sqrt(3)*sqrt(x)) 

16 combine(sqrt(x)*sqrt(y)) 

17 assume(x, 'positive') 

18 combine(sqrt(x)*sqrt(y)) 

19 clear 

20 syms x y 

21 combine(sqrt(x)*sqrt(y)) 

22 assumptions(x) 

23 assume(x, 'clear') 

2 4 combine(sqrt(x)*sqrt(y)) 

V_ J 
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Table 9.2 Simplification of Expressions 

Functions 

Description 

s = expand(expr,name,value) 

Expand expressions 

f = factor(expr,name,value) 

Factor expressions 

s = collect(expr,var) 

Collect terms with same powers 

s = combine(expr,name,value) 

Combine terms of same algebraic structures 

s = simplify(expr,name,value) 

General simplification 

s = simplifyFraction(expr,name,value) 

Compute normal forms of rational expressions 

assume(expr,set) 

Set assumption on symbolic variables 

assumptions(var) 

Show assumptions of symbolic variables 

Details and More: Help>Symbolic Math Toolbox>Mathematics>Formula Manipulation and Simplification 
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9.3 Symbolic Differentiation: Curvature of a Curve 


f v 

Example09_03.m: Curvature of a 
Planar Curve 

[2] The following commands calculate the curvature of 
a curve given in [1]. 

1 clear 

2 syms t 

3 x = cos(2*t) + cos(t); 

4 y = -sin(2*t) + sin(t); 

5 fplot(x, [0, 2*pi]), hold on 

6 fplot(y, [0, 2*pi]), hold off 

7 fplot(x f y, [0,2*pi]) 

8 xl = diff(x) 

9 x2 = diff(xl) 

10 yl = diff(y) 

11 y2 = diff(yl) 

12 n = xl*y2 - yl*x2 

13 d = (xl A 2 + yl A 2) A (3/2) 

14 n = simplify(n) 

15 d = simplify(d) 

16 k = n / d 

17 fplot(k, [0, 2*pi]) 

18 k = subs(k, cos(3*t ), 'C') 

V_ ) 
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B Live Editor - Example09_03.mix * ® x 


| j Example09_03.mlx * X + 
xl = diff(x) 
xl = -2 sin(2 1) - sin(f) 
x2 = diff(xl) 
x2 = -4 cos(2 f) - cos(/) 
yl = diff(y) 
yl = cos(/) - 2cos(2f) 
y2 = diff(yl) 


□a 


y2 = 4sin(2f) - sin(f) 
n = xl*y2 - yl*x2 
n = 

-(2 cos(2/) -cos(/)) (4cos(2f) + cos(/)) - (4sin(2f) -sin(/)) (2 sin(21) +sin(f)) 
d = (xl~2 + yl"2)"(3/2) 
d = 

2 2 3 / 2 

((2sin(2f) + sin(f)) + (2cos(2/) - cos(/)) ) 

n = simplify(n) 


n = 2cos(3 /) -7 
d = simplify(d) 


d = (5 - 4cos(31)) 3 ^ 2 
k = n / d 
k = 


2cos(3 /) -7 
(5-4co S (3/)) V2 


0 Live Editor - 

Example09_03.mlx * 


® X 

|[ Example09_03.mlx * xl + 

fplot(k. 

[0, 2*pi]) 




0.5 ■ 

r\ 

f A 

f V 


-1,5 ■ 

/ \ 

/ \ 

/ 1 

/ \ 

■ 



1 

i 


■ 


2.5 ■ 








I 


-3.5 ' 


1 1 

1 








: 

, , 

1 , J 

- 


0 

1 2 

3 4 

5 6 


k = subs(k, cos(3*t), 

■C-) 



k = 





2 C 

-7 




(5-4C) 3/2 
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Table 9.3 

Line Plots 

Functions 

Description 

fplot(fun,lineSpec) 

Plot expression or function 

fplot3(funx,funy,funz,lineSpec) 

3-D parametric curve plotter 

fimplicit(fun,lineSpec) 

Plot implicit function 

fimplicit3(fun,lineSpec) 

Plot 3-D implicit function 

Details and More: Help>MATLAB>Graphics>2-D and 3-D Plots>Line Plots 
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9.4 Symbolic Integration: Normal Distributions 


Example09_04.m: Normal Distribution Curves 

[2] This script plots a p.d.f. curve, Eq. (a), for the standard normal distribution. It also integrates the p.d.f. using the 
function int to obtain a c.d.f., Eq. (b), and plots a c.d.f. curve. —» 

1 clear 

2 mu = 0; sigma = 1; 

3 syms x 

4 f = exp(-(x-mu) A 2/(2*sigma A 2))/(sqrt(2*pi)*sigma); 

5 fplot(f, [-3, 3]), hold on 

6 p = int(f, x, -inf, x); 

7 fplot(p, [-3, 3]) 

8 axis([-3, 3, 0, 1]) 

9 xlabel('x') 

10 title('Standard Normal Distribution') 

11 legend('Probability Density Function', ... 

12 'Cumulative Distribution Function', ... 

13 'Location', 'northwest') 
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9.5 Limits 


Example09_05.m: Limits 

[2] The following commands demonstrate the use of the 
function limit. 

1 clear 

2 syms x h n 

3 f(x) = sin(x); 

4 g(x) = limit((f(x+h)-f(x))/h, h, 0) 

5 g(x) = diff(f) 

6 f(x) = x A n; 

7 g(x) = limit((f(x+h)-f(x))/h, h, 0) 

8 g(x) = diff(f) 

9 limit(sin(x)/x, x, 0) 

10 f(x) = limit((1+x/n)n, inf) 

11 vpa(f(1)) 

V_ J 


B Live Editor - Example09_05.mlx * 

® X 

|j Example09_05.mlx * X 1 + 

clear 

His 

syms x h n 
f(x) = sin(x); 

g(x) = limit((f(x+h)-f(x))/h, h, 

0) 

g(x) = cos (x) 


g(x) = diff(f) 


g(x) = cos(x) 


f(x) = x~n; 

g(x) = limit((f(x+h)-f(x))/h # h, 

0) 

g(x) = nx?~ l 


g(x) = diff(f) 


g(x) = n 1 


limit(sin(x)/x, x, 0) 


ans = 1 


f(x) = limit((1+x/n)^n, n, inf) 


f (x) = e* 


vpa(f (1) )| 


ans = 2.7182818284590452353602874713527 
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Table 9.5 Limits 

Functions 

Description 

limit(expr,x,a) 

Compute limit of symbolic expression 

Details and More: Help>Symbolic Math Toolbox>Mathematics>Calculus>Limits 
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9.6 Taylor Series 


Example09_06.m: Taylor Series 

[2] The following commands evaluate sin(/r/4) using three forms of Taylor series (1) expand at a = 0 to the 5th order, 

(2) expand at a = 0 to the 7th order, and (3) expand at a = 7r/4 to the 5th order. —» 

1 clear 

2 syms x 

3 f(x) = sin(x); 

4 Tl(x) = taylor(f) 

5 T2(x) = taylor(f, x, 'Order', 8) 

6 T3(x) = taylor(f, x, pi/4) 

7 vpa(f(pi/4)) 

8 vpa(Tl(pi/4)) 

9 vpa(T2(pi/4)) 

10 vpa(T3(pi/4)) 

_ J 


Table 9.6 Taylor Series 

Functions 

Description 

expr = taylor(fun) 

Taylor series 

expr = taylor(fun,var,a) 

Taylor series 

expr = taylor(fun,var,name,value) 

Taylor series 

Details and More: Help>Symbolic Math Toolbox>Mathematics>Calculus>Series 
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|B Live Editor - Example09_06.mlx * 


jj Example09_06.mlx * X 1 + 


clear 
syms x 

f(x) = sin(x); 
Tl(x) = taylor(f) 


Tl(x) = 


jc 5 

120 


—+ JC 
6 


T2(x) = taylor(f, x, ‘Order 1 , 8) 
T2(x) = 

--±—+_-_ + * 

5040 120 6 






T3(x) = taylor(f, x, pi/4) 
T3(x) = 


2 2 



vpa(f(pi/4)) 


ans = 0.70710678118654752440084436210485 
vpa(Tl(pi/4)) 


ans = 0.70714304577936024806870707375421 
vpa(T2(pi/4)) 


ans = 0.70710646957517807081792046856723 
vpa(T3(pi/4)) 


ans = 0.70710678118654752440084436210485 
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9.7 Algebraic Equations 


( " A 

Example09_07.m: Algebraic Equations 

[2] The following commands demonstrate the symbolic solution of algebraic equations. 

1 clear 

2 syms x a b c 

3 eq = a*x A 2+b*x+c; 

4 solve(eq) 

5 eq = (cos(x)==1); 

6 solve(eq) 

7 [sol, param, cond] = solve(eq, 'ReturnConditions', true) 

8 syms y d e f 

9 eql = a*x+b*y==c; 

10 eq2 = d*x+e*y==f; 

11 sol = solve(eql, eq2) 

12 [sol.x, sol.y] 

13 [A, b] = equationsToMatrix(eql, eq2, x, y) 

14 sol = linsolve(A, b) 

15 sol = A\b 

16 sol = inv(A)*b 

% _ J 
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Table 9.7 Algebraic Equations 

Functions 

Description 

sol = solve(eqn,var) 

Solve algebraic equations 

[A,b] = equationsToMatrix(eqns,vars) 

Convert linear system of equations to matrix form 

sol = linsolve(A,b) 

Solve linear system of equations in matrix form 

x = A\b 

Solve linear system of equations Ax = b 

B = inv(A) 

Inverse of a matrix 

Details and More: 

Help>Symbolic Math Toolbox>Mathematics>Equation Solving>Linear and Nonlinear Equations and systems 
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9.8 Inverse of Matrix: Hooke's Law 379 


9.8 Inverse of Matrix: Hooke's Law 


( 

Example09_08.m: Inverse of Matrix 


[2] The following commands calculate F defined in [1]. 

-> 

1 

clear 



2 

syms E v G 



3 

K = [1/E, -v/E, 

-v/E, 0, 0 

o? 

4 

-v/E, 1/E, 

-v/E, 0, 0, 

0; 

5 

-v/E, -v/E, 

l/E, 0, 0, 

0; 

6 

0, o. 

0, 1/G, 0, 

0; 

7 

0, 0, 

0, 0, 1/G, 

o? 

8 

0, 0, 

o 

o 

o 

1/G] 

9 

V 

F = inv(K) 


J 
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9.9 Ordinary Differential Equations (ODE): 
Vibrations of Supported Machines 


Example09_09a.m: Undamped Free Vibrations 

[2] The following commands successfully obtain a general solution for the undamped case, Eq. (a); however, they fail to 
obtain a particular solution that satisfies the initial conditions, Eq. (b). —» 

1 clear 

2 syms t m k delta omega clear 

3 syms x(t) 

4 xl(t) = diff(x); 

5 x2(t) = diff(xl); 

6 ode = m*x2+k*x==0; 

7 x(t) = dsolve(ode) 

8 assume( [m, k], 'positive') 

9 x(t) = dsolve(ode) 

10 x(t) = combine(x) 

11 x(t) = subs(x, (k/m) A (1/2), omega) 

12 x(t) = dsolve(ode, x(0)==delta, xl(0)==0) 

v_ ) 
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Example09_09b.m: Undamped Free Vibrations 

[6] The following commands successfully obtain a particular solution by solving the system of first-order ODEs, Eqs. 
(m, n), along with the initial conditions, Eqs. (o, p). —» 


13 

clear 

14 

syms 

t m k delta omega clear 

15 

syms 

x(t) v(t) 

16 

xl(t) 

= diff(x); 

17 

vl(t) 

= diff(v); 

18 

odel 

= m*vl+k*x==0; 

19 

ode2 

> 

ii 

ii 

i— i 

X 

ii 

20 

assume)[m, k], 'positive') 

21 

sol = 

dsolve(odel, ode2, x(0)==delta. 

22 

x(t) 

= sol.x 

23 

v(t) 

= sol.v 

24 

x(t) 

= combine(x) 

25 

x(t) 

= subs(x, (k/m) A (l/2), omega) 

26 

v(t) 

= combine(v) 

27 

v(t) 

= subs(v, (k/m) A (l/2), omega) 


V_ J 









384 Chapter 9 Symbolic Mathematics 
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Example09_09c.m: Damped Free Vibrations 

[11] The following commands solve the system of ODEs, Eqs. (q, r), along with the initial conditions, Eqs. (s, t). 

28 clear 

29 syms t x(t) v(t) 

30 m = 1; c = 1; k = 100; delta = 0.2; 

31 xl(t) = diff(x); 

32 vl(t) = diff(v); 

33 odel = m*vl+c*v+k*x==0; 

34 ode2 = xl==v; 

35 sol = dsolve(odel, ode2, x(0)==delta, v(0)==0) 

36 x(t) = sol.x 

37 v(t) = sol.v 

38 fplot(x, [0,2 ] ) 

39 fplot(v, [0,2]) 

40 vpa(x, 5) 

41 vpa(v, 5) 
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9.10 Additional Exercise Problems 



Chapter 10 

Linear Algebra, Polynomial, Curve 
Fitting, and Interpolation 

10.1 Products of Vectors 389 

10.2 Systems of Linear Equations 393 

10.3 Backslash Operator (\) 398 

10.4 Eigenvalue Problems 401 

10.5 Polynomials 403 

10.6 Polynomial Curve Fittings 407 

10.7 Interactive Curve-Fitting Tools 410 

10.8 Linear Fit Through Origin: Brake Assembly 412 

10.9 Interpolations 417 

10.10 Two-Dimensional Interpolations 420 


So far, we’ve introduced the 
core functionalities of 
MATLAB. Starting from this 
chapter, we'll introduce topics 
that are useful for junior 
engineering college students. 
We'll use either symbolic 
approach or numeric approach 
whenever it is more 
instructional and practical. 
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10.1 Products of Vectors 


Example 10_01a.m: Products of Vectors 

[2] These commands calculate the dot product and cross product expressed in 
Eqs. (b) and (d), using the symbolic approach. 

1 clear 

2 syms al a2 a3 bl b2 b3 real 

3 a = [ al, a2 , a3 ] ; 

4 b = [bl, b2, b3]; 

5 d = dot(a,b) 

6 c = cross(a,b) 


□ Live Editor - ExamplelOJDla.mlx *_© x 


| Examplel0_01a.mlx * X + 


clear 

syms al a2 a3 bl b2 b3 real 
a = [al, a 2 , a 3 ]; 
b = [bl, b 2 , b 3 ]; 
d = dot(a,b) 

d = a, ^ + 02^ + 0363 
c = cross(a,b) 

c = (<32 b$ - <23 bz a 3 b { - aib} - a 2 b { ) 


I Ha 
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Example lOOlb.m: Angle and Normal 

[6] Given three points, these commands calculate 
an angle and a unit normal according to [5], 
using the numerical approach. 


7 clear 

8 pi = [3, 5, 2]; 

9 p2 = [ 1, 0 , 0 ] ; 

10 P 3 = [3 , -1, 0]; 

11 a = p2-pl; 

12 b = p3-pl; 

13 d = dot(a,b) 

14 theta = acosd(d/(norm(a)*norm(b))) 

15 c = cross(a,b) 

16 theta = asind(norm(c)/(norm(a)*norm(b))) 

17 n = c/norm(c) 


18 

» Example10_( 

19 

d = 

20 

34 

21 

theta = 

22 

20.639 

23 

c = 

24 

-2 -4 

25 

theta = 

26 

20.639 

27 

n = 

28 

-0.15617 

29 

» 


12 


-0.31235 


0.93704 


V 
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Example lO Olc.m: Plane Defined by 3 Points 

[10] Given three points, these commands find the equation of the plane 
defined by the three points, according to Eq. (j). Knowing the equation, 
this script then plots the plane. 


30 

clear 


31 

pi = 

sym([3,5, 

2]); 

32 

p2 = 

sym([1,0, 

0]); 

33 

p3 = 

sym([3,-1 

,0]); 

34 

a = 

p2-pl; 


35 

b = 

p3-pl; 


36 

syms 

x y z 


37 

r = 

[x, y, z]; 


38 

eq = 

dot(cross 

(a,b), 

39 

fimplicit3(eq. 

[0 10 

40 

axis 

vis3d 
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Example 10_01d.m: Converting a Symbolic Expression to a Numerical Function 

[14] Often, we need to convert a symbolic expression to a MATLAB function, so we may process the data numerically. 
We now demonstrate the use of the function matlabFunction (see 1.7[8], page 30) to convert a symbolic expression 
to a numerical function. And the plane is plotted using the function mesh. 

Now, while the symbolic expression eq is still in the Workspace, execute the following commands: 


41 z = solve(eq, z) 

42 z = matlabFunction(z) 

43 [X,Y] = meshgrid( 0 : 10,0 : 10 ); 

44 Z = z(X,Y); 

45 mesh(X,Y, Z ) 

Line 41 convert the equation to the form z = z(x,y); the result is 


(k) 


Line 42 converts the symbolic expression z(x,y) into a MATLAB function using matlabFunction. Note that the 
variable z before the conversion is of type sym.; after the conversion, it is a function handle. 

Line 43 creates a mesh grid in the X-Y space, each axis ranging from 0 to 10. Line 44 calculates z-values using the 
plane equation, Eq. (k). Line 45 plots the plane. # 

N J 


Table 10.1 Summary of Functions 

Functions 

Description 

syms vl v2 ... real 

Symbolic variables 

dot(a, b) 

Dot product 

cross(a, b) 

Cross product 

norm(a) 

Vector and matrix norm 

asind(x) 

Inverse sine in degrees 

acosd(x) 

Inverse cosine in degrees 

fimplicit3(f, interval) 

Plot 3-D implicit function 

solve(eq, z) 

Solve equations 

matlabFunction(expr) 

Convert symbolic expression to MATLAB function 

meshgrid(x,y) 

Generate 2D grid 

mesh(X,Y,Z) 

Mesh plot 

axis vis3d 

Freeze aspect ratio of axes 
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10.2 Systems of Linear Equations 
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Example 10_02a.m: A System of Two Linear Equations 

[7] These commands solve a system of linear equations, using the methods described in [2] (last page) and [6]. —> 

1 clear 

2 A = [1 2; 3 4]; b = [5; 6]; 

3 det(A) 

4 x = linsolve(A, b) 

5 x = A\b 

6 A = A' ; b = b' ; 

7 det(A) 

8 x = b/A 

9 A = [1 2; 3 6]; b = [5; 6]; 

10 det(A) 

11 x = A\b 

12 b = [5; 15]; 

13 x = A\b 

_ J 





14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 
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» Examplel0_02a 
ans = 

-2 

x = 

-4.0000 

4.5000 

x = 

-4.0000 
4.5000 
ans = 

-2 

x = 

-4.0000 4.5000 

ans = 

0 

> In Examplel0_02a (line 11) 

Warning: Matrix is singular to working precision, 
x = 

-Inf 

Inf 

> In Examplel0_02a (line 13) 

Warning: Matrix is singular to working precision, 
x = 

NaN 

NaN 
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/ \ 

Example 10_02b.m: Three-Bar Truss 

[13] These commands solve the system of linear equations given in Eq. (b) of 3.14[1], page 154. 


41 

42 

43 

clear 

a = sqrt(2)/2 
A = [-a a 0 

r 

0 

0 

0; 

44 

-a -a 0 

0 

0 

0; 

45 

a 0 1 

1 

0 

0; 

46 

a 0 0 

0 

1 

0; 

47 

0 -a -1 

0 

0 

0; 

48 

0 a 0 

0 

0 

i]; 

49 

b = [0, 1000, 

0, 

0, 

0, 0]'; 

50 

51 

x = A\b 

x = linsolve(A,b) 


52 

53 

det(A) 

A = A' ; 


56 

» Examplel0_02b 

54 

b = b' ; 


57 

x = 

55 

x = b/A 


58 

-707.1068 


59 -707.1068 

60 500.0000 

61 0 

62 500.0000 

63 500.0000 

64 x = 

65 -707.1068 

66 -707.1068 

67 500.0000 

68 0 

69 500.0000 

70 500.0000 

71 ans = 

72 -1.0000 

73 x = 

74 -707.1068 -707.1068 500.0000 


0 


500.0000 500.0000 
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Table 10.2 Summary of Functions 

Functions 

Description 

det(A) 

Matrix determinant 

linsolve(A, b) 

Solve linear system of equations 

x = A\b 

Solve linear system of equations 

x = b/A 

Solve linear system of equations 

[L, U] = lu(A) 

LU matrix factorization 
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10.3 Backslash Operator (\) 


If A is not sparse 
If A is square 

if A is triangular 

Use triangular solver 
else if A is permuted triangular 

Use permuted triangular solver 
else if A is Hermitian 

If the diagonals of A are real and positive 
Use Cholesky solver 
if Cholesky failed 
Use LDL solver 
end 

else 

Use LDL solver 
end 

else if A is upper Hessenberg 
Use Hessenberg solver 

else 

Use LU solver 
end 

else (A is not square) 

Use QR solver 
end 

else (A is sparse) 

If A is square 

Compute the bandwidth of A 
If A is diagonal 

Use diagonal solver 
else if A is tridiagonal 
Use tridiagonal solver 
else if A is banded 
Use banded solver 
else if A is triangular 

Use triangular solver 
else if A is permuted triangular 

Use permuted triangular solver 
else if A is Hermitian 

if the diagonals of A are real and positive 
Use Cholesky solver 
if Cholesky failed 
Use LDL solver 
end 

else if A is real 

Use LDL solver 

else 

Use LU solver 
end 

else 

Use LU solver 
end 

else (A is not square) 

Use QR solver 
end 
end 
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Example 10_03.m: LU Factorization 

[5] These commands illustrate the method in [4]. —» 


1 

clear 




2 

a = sqrt(2)/2; 




3 

A = [-a a 0 

0 

0 

0; 

4 

-a -a 0 

0 

0 

0; 

5 

a 0 1 

1 

0 

0; 

6 

a 0 0 

0 

1 

0; 

7 

0 -a -1 

0 

0 

0; 

8 

0 a 0 

0 

0 

i]; 

9 

b = [0, 1000, 

0, 

0, 

0 , 0 

10 

[L,U] = lu(A) 




11 

y = L\b 




12 

x = U\y 





V_ J 
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13 

» Example10_03 

14 

L 

= 


15 


1.0000 

0 

16 


1.0000 

1.0000 

17 


-1.0000 

-0.5000 

18 


-1.0000 

-0.5000 

19 


0 

0.5000 

20 


0 

-0.5000 

21 

U 

= 


22 


-0.7071 

0.7071 

23 


0 

-1.4142 

24 


0 

0 

25 


0 

0 

26 


0 

0 

27 


0 

0 

28 

y 

= 


29 



0 

30 


1000 

31 


500 

32 



0 

33 


500 

34 


500 

35 

X 

= 


36 


■707.1068 


37 


■707.1068 


38 


500.0000 


39 


0 


40 


500.0000 


41 


500.0000 



0 0 0 

0 0 0 

0 0 0 

0 1.0000 0 

1.0000 0 0 

0 0 1.0000 

0 0 0 

0 0 0 

1.0000 0 0 

1.0000 0 0 

0 1.0000 0 

0 0 1.0000 


0 

0 

0000 

0 

0000 

0 

0 

0 

0000 

0 

0 

0 
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10.4 Eigenvalue Problems 
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Example 10_04.m: Eigenvalue Problems 

[2] These commands solve the eigenvalue problem described in Eqs. (d-f), last page. 


1 

clear 



2 

K = [40, 

-25, 

0; 

3 

-25, 

50, 

-30; 

4 

0, 

-30, 

60] 


5 M = diag([3, 4, 5]) 

6 [X, Lamda] = eig(K, M) 

7 Omega = sqrt(Lamda) 

v_ J 


8 » Example10_04 

9 K = 


10 

40 -25 

0 


11 

-25 50 

-30 


12 

0 -30 

60 


13 

M = 



14 

3 0 

0 


15 

0 4 

0 


16 

0 0 

5 


17 

X = 



18 

-0.2788 

0.3918 

-0.3195 

19 

-0.3547 

0.0337 

0.3508 

20 

-0.2296 

-0.3271 

-0.2008 

21 

Lamda = 



22 

2.7318 

0 

0 

23 

0 

12.6175 

0 

24 

0 

0 

22.4840 

25 

Omega = 



26 

1.6528 

0 

0 

27 

0 

3.5521 

0 

28 

0 

0 

4.7417 
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10.5 Polynomials 


Example 10_05a.m: Polynomials 

[2] These commands demonstrate some basic functions of manipulating the MATLAB polynomials. 

1 clear 

2 p = [1, -2 , -1, 2]; 

3 polyval(p, 3) 

4 x = linspace(-2,3); 

5 plot(x, polyval(p,x )), grid on 

6 r = roots(p) 

7 poly(r) 

8 pi = polyint(p) 

9 polyder(pl) 

10 a = [1, 3 , 5]; 

11 b = [2, 4, 6]; 

12 c = polyder(a,b) 

13 [n,d] = polyder(a,b) 


14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 


» Examplel0_05a 
ans = 

8 

r = 

- 1.0000 

2.0000 

1.0000 


ans 

1.0000 

-2.0000 

-1 

pi = 

0.2500 

-0.6667 

-0 

ans 

CM 

1 

i — 1 

II 

-1 

2 

c = 


8 30 

56 

38 

n = 


00 

1 

CM 

1 

-2 


d = 


4 16 

40 

48 


0000 2.0000 

5000 2.0000 0 


36 
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Example 10_05b.m: Symbolic Polynomials 

[6] These commands do the same tasks as those in [2], but using symbolic mathematics instead. 


33 

clear 


34 

syms x 


35 

p(x) = poly2sym([1, 

-2, - 

36 

P(3) 


37 

fplot(p), axis([-2, 

3,-12, 

38 

r = solve(p) 


39 

pi = int(p) 


40 

diff(pi) 


41 

a = poly2sym([l, 3, 

5]) 

42 

b = poly2sym([2, 4, 

6]) 

43 

c = diff(a*b) 


44 

[n,d] = numden(diff(a/b)) 




B Live Editor - Examplel0_05b.mlx * 


Examplel0_05b.mlx * X | + 

clear 
syms x 

P(x) = poly2sym([l, -2, -1, 2]) 

p(x) = jc 3 - 2x*-x+ 2 
P (3) 


® x 




ans = 8 

fplot(p), axis([-2,3,-12,8]), grid on 



r = solve(p) 


pi = int(p) 
pl(x) = 

*L_2J_i_ + 2x 


diff(pi) 
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E Live Editor - Examplel0_05b.mlx * 


Example 10_05b.mlx * x j + 


a * poly2sym([1, 3, 5]) 

a = x 2 + 3x + S 
b = poly2sym([2, 4, 6]) 

b = 2x* + 4x + 6 
c = diff(a*b) 

c = (2 jc+3) (2jc 2 + 4jc + 6) + (4x + 4) (j^ + 3jc + 5) 
[n,d] = numden(diff(a/b)) 

n = -x 2 -4x-l 
d = 2 (x 2 + 2x + 3) 2 




Table 10.5 Summary of Functions 

Functions 

Description 

polyval(p, x) 

Evaluates a polynomial p at x 

roots(p) 

Finds the roots of the equation p = 0 

poly(r) 

Returns a polynomial of specified roots r 

polyint(p) 

Integrates a polynomial p 

polyder(p) 

Differentiates a polynomial p 

p = polyder(pi,p2) 

Differentiates the product of polynomials pi and p2 

[n,d] = polyder(pi,p2) 

Differentiates the division of polynomials pi and p2 

s = poly2sym(p) 

Converts a polynomial from numeric form to symbolic form 

sym2poly(expr) 

Converts a polynomial from symbolic form to numeric form 

int(expr) 

Integrates a symbolic expression 

diff(expr) 

Differentiates a symbolic expression 

[n,d] = numden(expr) 

Extracts numerator and denominator of a symbolic expression 
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10.6 Polynomial Curve Fittings 


Temperature T (K) 

33 

144 

255 

366 

477 

589 

700 

811 

922 

Young's Modulus E (GPa) 

220 

213 

206 

199 

192 

185 

167 

141 

105 


( 

Example 10_06.m: Polynomial Curve Fittings 

[2] This script finds the polynomials of degrees one, two, and three that best-fit the data points in [1]. —» 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 


clear 

T = [ 33, 144, 255, 366, 477, 589, 700, 811, 922]; 
E = [220, 213, 206, 199, 192, 185, 167, 141, 105]; 
temp = 0:50:1000; 
format shortG 
for k = 1:3 

P = polyfit(T, E, k) 
young = polyval(P, temp); 
subplot(2,2,k) 

plot(T, E, 'o', temp, young) 

axis([0,1000,100,250]) 

xlabel('Temperature (K)') 

ylabel('Young''s Modulus (GPa)') 

title(['Polynomial of Degree ', num2str(k)]) 

residual = E - polyval(P, T); 

error = norm(residual) 

R = sqrt(1-error A 2/norm(E) A 2) 

end 


A 


V 


J 
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19 » Example10_06 

20 P = 

21 -0.11514 235.86 

22 error = 

23 37.055 

24 R = 

25 0.99775 

26 P = 

27 -0.00015541 0.033291 213.23 

28 error = 

29 15.469 

30 R = 

31 0.99961 

32 P = 

33 -2.9124e-07 0.00026175 -0.12346 224.67 

34 error = 

35 3.3894 

36 R = 

37 0.99998 


Polynomial of Degree 1 


Polynomial of Degree 2 




Temperat ore (K) Temperat ore (K) 


Polynomial of Degree 3 



Temperature (K) 
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Table 10.6 Summary of Functions 

Functions 

Description 

format shortG 

Uses short or shortE, whichever is more compact 

polyfit(x,y,n) 

Finds a polynomial of degree n that is a best fit for the data points (x, y) 

polyval(p,x) 

Evaluates a polynomial p at x 

subplot(m,n,k) 

Creates axes in tiled positions 

norm(a) 

Calculates vector/matrix norm 
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10.7 Interactive Curve-Fitting Tools 


( ~ A 

[1] In this section, we'll demonstrate the use of an interactive curve-fitting tool built in MATLAB to perform the tasks 

covered in the last section. First, prepare the data points and create a figure: 

» clear 

» T = [ 33, 144, 255, 366, 477, 589, 700, 811, 922]; 

» E = [220, 213, 206, 199, 192, 185, 167, 141, 105]; 

» plot(T, E, 'o') 

» axis([0, 1000, 100, 250]) 

k_ ) 




File Edit View Insert Tools Desktop Window Help 


1 !) 0 A ^ 


® c a * a □ b | □ o 



[3] Select linear, quadratic, 

and cubic (see [9], next page). 


asic Fitting - 1 


Sell t data: datal 


Plo 




Center and scale x data 
fits 


C teck to display fits on figure 


0 100 200 300 400 500 600 700 800 900 1000 


spline interpolant 
shape-preserving interpolant 

rT 

W quadratic 
W c y 

4th degree polynomial 
5th degree polynomial 
6th degree polynomial 
V 7th degree polynomial 
r~ 8th degree polynomial 



[8] Select Show norm of residuals 

(see [12], next page). —> 


[7] Select Separate figure (see 
[11], next page). 
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25 
20 
15 
10 
5 
0 
-5 
-10 
-15 
-20 
-25 

0 100 200 300 400 500 600 700 800 900 1000 


residuals 
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10.8 Linear Fit Through Origin: Brake Assembly 


Brake fluid pressure 
x (kgf/mm 2 ) 

0.008 

0.016 

0.032 

0.064 

Braking torque 
y (kgf-mm) 

4.8 

11.1 

23.1 

42.0 

1.2 

8.6 

18.1 

36.0 

5.7 

13.0 

25.1 

43.2 

4.4 

11.8 

21.4 

37.6 
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Original Design 
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( J % 

Example 10_08a.m: The Original Design 

[4] This script finds a line through origin that best-fits the data points in [1] and calculates the error, Eq. (d). 

1 clear 


2 

x = 

[0. 

008 

, 0.008, 

0. 

008 , 

, 0. 

. 008, . . . 

3 


0. 

016 

, 0.016, 

0. 

016, 

, 0. 

.016, ... 

4 


0. 

032 

, 0.032, 

0. 

032, 

, 0. 

.032, ... 

5 


0. 

064 

, 0.064, 

0. 

064, 

, 0. 

.064 ] ; 

6 

y = 

[4. 

8, 

1.2, 5 

.7, 

4. 

• 4, 

. . . 

7 


11. 

1, 

8.6, 13 

.0, 

11. 

.8, 

... 

8 


23. 

1, 

18.1, 25 

.1, 

21. 

•4, 

... 

9 


42. 

o. 

36.0, 43 

.2, 

37. 

.6]; 


10 

slope = 

: sum(x.*y)/ 

sum 

l(x. ' 

2); 


11 

residual = 

y-slope 

*x; 





12 error = norm(residual); 

13 plot(x, y, 'o'), hold on 

14 hAxes = gca; 

15 hAxes.XTick = [0.008,0.016,0.032,0.064]; 

16 axis([0,0.08,0,70]); 

17 plot([0,0.08],[0,slope*0.08]) 

18 text(0.032, 45, ['Slope = ', num2str(slope)]) 

19 text(0.032, 40, ['Error = ', num2str(error)]) 

20 legend('Measured Data', 'Linear Fit') 

21 title('Original Design') 

V___ ) 


Brake fluid pressure 
x (kgf/mm 2 ) 

0.008 

0.016 

0.032 

0.064 

Braking torque 
y (kgf-mm) 

5.3 

12.2 

24.6 

49.3 

4.6 

10.1 

23.1 

47.1 

5.8 

13.2 

25.0 

50.1 

5.4 

11.9 

24.3 

48.2 
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Example 10_08b.m: An Improved Design 

[7] This script finds a line through origin that best-fits the data points listed in [6], last page, and calculates the error. 
The dimmed lines are copied from Example 10_08a.m, last page; the other statements are self-explained. 


22 

clear 




23 

x = [0.008, 

0.008, 

0.008, 

0.008, . . . 

24 

0.016, 

0.016, 

0.016, 

0.016, . . . 

25 

0.032, 

0.032, 

0.032, 

0.032, . . . 

26 

0.064, 

0.064, 

0.064, 

0.064]; 


27 

y = [5.3, 

4.6, 

5.8, 

5.4, 

28 

12.2, 

10.1, 

13.2, 

11.9, 

29 

24.6, 

23.1, 

25.0, 

24.3, 

30 

49.3, 

47.1, 

i —i 

o 

lO 

48.2]; 


31 slope = sum(x.*y)/sum(x. A 2); 

32 residual = y-slope*x; 

33 error = norm(residual); 

34 plot (x,y, 'o'), hold on 

35 hAxes = gca; 

36 hAxes.XTick = [0.008,0.016,0.032,0.064]; 

37 axis([0,0.08,0,70]); 

38 plot([0,0.08],[0,slope*0.08]) 

39 text(0.032, 45, ['Slope = ', num2str(slope)]) 

40 text(0.032, 40, ['Error = ', num2str(error)]) 

41 legend('Measured Data', 'Linear Fit') 

42 title('Improved Design') 

v_ ) 


Improved Design 
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p \ 

Using Backslash Operator for Least Squares Linear Fit 

[9] In Section 10.3, when discussing systems of linear equations 

Ax = b 

We assumed that A is an n-by-n square matrix, x is an n-by-l vector, and b is also an n-by-l vector. (We also assume the 
determinant of A is nonzero.) 

What if the system of equations is over-specified; i.e., the number of equations is more than the number of unknown 
variables? Assume that A is an m-by-n matrix (x is n-by-l and b is m-by-1), where m>n. In such cases, the backslash 
operator A\b will use a least-squares fit algorithm similar to that used by poly fit, discussed in Section 10.6. 

Now, returning to our problem of finding a line y = bx that best fits n points (x k ,y k ), k = 1, 2, ... n, we may treat the 
problem as 

x'b = y' 

where x' is n- by-1, b is 1-by-l, and y' is n-by-l. The least squares solution of b can be calculated with 

b = x 1 \y 1 

To confirm these concepts, at the end of Example 10_08b.m, type 

» format short 
» b = x’\y’ 
b = 

757.9044 

Which are consistent with that calculated using Eq. (c) (page 413) and shown in [8] (last page). 

The built-in function lsqlin (least-square linear regression) also does the same job: 

» b = lsqlin(x',y') 
b = 

757.9044 

We’ll discuss more about lsqlin for multivariate linear regression in Section 12.8. # 

v_ J 
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10.9 Interpolations 


Temperature T (K) 

33 

144 

255 

366 

477 

589 

700 

811 

922 

Young's Modulus E (GPa) 

220 

213 

206 

199 

192 

185 

167 

141 

105 


( ~ ^ 

Example 10_09a.m: Interpolations 

[3] This script produces a graph shown in [4], next page. —» 

1 clear 

2 T = [ 33, 144, 255, 366, 477, 589, 700, 811, 922]; 

3 E = [220, 213, 206, 199, 192, 185, 167, 141, 105]; 

4 plot(T, E, 'o'), hold on 

5 temp = 0:10:1000; 

6 young = interpl(T, E, temp); 

7 plot(temp, young, 1 r:') 

8 young = interpl(T, E, temp, 'spline'); 

9 plot(temp, young, 'b-') 

10 axis([0,1000,100,250]) 

11 xlabel('Temperature (K)') 

12 ylabel('Young''s Modulus (GPa)') 

13 legend('Data Points', 'Linear Interpolation', 'Spline Interpolation') 


v 
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f \ 

Example 10_09b.m: Roots Finding by Interpolations 

[6] An application of interpolation is to find the roots of an equation. As an example, this script solves the equation 
sinx + 2cosx-0.5 = 0. The output (see [7]) shows that a solution of the equation is x = 1.8089. 


14 

15 

16 

17 

18 

19 

20 
21 


clear 

x = linspace(0,pi); 

y = sin(x)+2*cos(x)-0.5; 

plot(x,y,[0,pi], [0,0]), hold on 

axis([0, pi, -2.5, 2]) 

xl = interpl(y,x,0) 

plot([xl, xl], [-2.5, 2]) 

text(xl,0.1,num2str(xl)) 



y 
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10.10 Two-Dimensional Interpolations 


ExamplelOlO.m: Two-Dimensional Interpolations 

[2] This script produces two figures as shown in [3,4]. 

1 clear 

2 [X,Y] = meshgrid(-3:3); 

3 Z = peaks(X,Y); 

4 surf(X,Y,Z) 

5 title('Measured Data') 

6 [XI,Yl] = meshgrid(-3:0.1:3); 

7 Zl = interp2(X,Y,Z,XI,Y1, 'spline'); 

8 figure 

9 surf(XI,Yl,Zl) 

10 title('Spline Interpolation') 

v_ J 










Chapter 11 

Differentiation, Integration, and 
Differential Equations 


Engineering problem-solving 
often involves three stages: 
establishing differential 
equations for the problem, 
solving the differential 
equations, and interpreting the 
solution. Traditional 
engineering mathematics is 
abstract and hard for a junior 
college student. However, 
through the use of MATLAB, 
these mathematics become 
concrete and easy to 
understand. 


11.1 Numerical Differentiation 422 

11.2 Numerical Integration: trapz 425 

11.3 Length of a Curve 427 

11.4 User-Defined Function as Input Argument: integral 430 

11.5 Area and Centroid 431 

11.6 Placing Weight on Spring Scale 433 

11.7 Double Integral: Volume Under Stadium Dome 436 

11.8 Initial Value Problems 43 8 

11.9 IVP: Placing Weight on Spring Scale 441 

11.10 ODE-B VP: Deflection of Beams 443 

11.11 IB VP: Heat Conduction in a Wall 446 
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11.1 Numerical Differentiation 



11.1 Numerical Differentiation 423 


ExamplellOl.m: Forward, Backward, and Central Differences 

[3] Using y = sin(x), i.e., y f = cos(x), as an example, this script compares three numerical differentiation methods 
introduced in [2], last page. The graphics output is shown in [4-9]. 

1 clear 

2 n = 10; 

3 x = linspace(0, pi/2, n); 

4 y = sin(x); 

5 yl = cos(x); 

6 plot(x, yl, 'b—'), hold on 

7 axis([0, pi/2, 0, 1]) 

8 yl = diff(y)./diff(x); 

9 plot(x(1:n-l), yl, 'kx:') 

10 plot(x(2:n), yl, 'k+:') 

11 yl = gradient(y, x); 

12 plot(x, yl, 'ko') 

13 xlabel('x') 

14 ylabel('cos(x)') 

15 legend('Exact', 'Forward', 'Backward', 'Central') 

v_ ) 



x 
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x 












11.2 Numerical Integration: trapz 425 


11.2 Numerical Integration: trapz 
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Examplell_02.m: Numerical Integration 

[3] This script generates a graph as shown in [2], last page, and calculates the area under the curve y(x) = 20 + x 2 , i.e., 

p 10 

performing numerical integration y(x)dx , using the function trapz. 

J o 

1 clear 

2 n = 11; 

3 x = linspace(0,10,n); 

4 y = 20 + x. A 2; 

5 plot(x, y, 'k'), hold on 

6 plot([x;x], [zeros(l,n);y], 'k') 

7 axis([0, 10, 0, 120]) 

8 xlabel('x') 

9 ylabel('y = 20+x"2') 

10 A = trapz(x, y) 

11 text(l, 40, ['Area = ', num2str(A)]) 

V_ ) 
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11.3 Length of a Curve 


Example 1 l_03a.m: Length of a Curve 

[2] This script calculates the length of the curve defined by Eq. (b), using the function trapz. 

1 clear 

2 n = 500; 

3 t = linspace(0,3*pi,n); 

4 x = sin(2*t); 

5 y = cos(t); 

6 z = t; 

7 plot3(x, y, z) 

8 axis vis3d, box on, grid on 

9 xlabel('x'), ylabel('y'), zlabel('z') 

10 f = sqrt(gradient(x,t).^2+gradient(y,t).^2+gradient(z,t). A 2); 

11 L = trapz(t, f) 

V_ ) 




File Edit View Insert Tools DeskkJp V?TSid< 

jw Help -a 

"J e A j | ir j \ b ® * 

) & * | Q □ Id | ■ 0 
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Examplell_03b.m: Convergence Study 

[5] This script repeats the calculation of the length with n = 100, 200, , 2000, and generates a convergence curve as 

shown in [6-7]. —» 

12 clear 

13 k = 0; 

14 for n = 100:100:2000; 

15 t = linspace(0,3*pi,n); 

16 x = sin(2*t); 

17 y = cos(t); 

18 z = t; 

19 f = sqrt(gradient(x,t). A 2+gradient(y,t).^2+gradient(z,t). A 2); 

20 k = k+1; 

21 L(k) = trapz(t, f); 

22 end 

23 plot([100:100:2000], L, 'o-'), hold on 

24 plot([0,2000], [L(k), L(k)]) 

25 text(1200,L(k)+0.003, ['Length = ', num2str(L(k))]) 

26 xlabel('Number of Segments') 

27 ylabel('Calculated Length') 




Calculated Length 


[6] As the number of segments increases, the 
convergence curve (the curve with circular marks) 
approaches a horizontal asymptote, of which the y- 
value is the analytical value (exact value). 
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[7] The value calculated by 
Examplell_03a.m is 17.2197. 
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11.4 User-Defined Function as Input Argument: 
integral 


( ~ ^ 

Example 1 l_04.m: Numerical Integration 

[2] This script calculates the length of the curve defined in Eq. (b), page 427, using the function integral. 

1 L = integral(@fun, 0, 3*pi) 

2 

3 function dL = fun(t) 

4 x = sin(2*t); 

5 y = cos(t); 

6 z = t; 

7 dL = sqrt(gradient(x,t).~2+gradient(y,t)."2+gradient(z,t).^2); 

8 end 

V_ ) 
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11.5 Area and Centroid 


& \ 

Example 1 l_05.m: Area and Centroid 

[2] This script calculates the area and the centroid of the area bounded by two curves defined in Eq. (d). —» 

1 clear 

2 syms x y 

3 yl = x+2; 

4 y2 = x A 2; 

5 fplot(yl), hold on, fplot(y2) 

6 axis([-3,3,0,6]) 

7 legend('y = x+2', 'y = x A 2', 'Location', 'southeast') 

8 title('Two Curves') 

9 eql = (y == yl); 

10 eql = (y == y2); 

11 sol = solve(eql, eq2); 

12 xl = double(sol.x(1)) 

13 x2 = double(sol.x(2)) 

14 yl = double(sol.y(1)) 

15 y2 = double(sol.y(2)) 

16 funA = @(x) abs((x+2)-(x. A 2)); 

17 A = integral(funA,xl,x2) 

18 funX = @(x) x.*abs((x+2)-(x.^2)); 

19 funY = @(x) abs((x+2). A 2-(x.^4)); 

20 xc = integral(funX,-1,2)/A 

21 yc = integral(funY,-1,2)/(2*A) 
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11.6 Placing Weight on Spring Scale 



Ramp Force Applied on the Spring Scale 
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Examplell_06.m: Spring Scale 

[3] This program calculates the response of the system described in [1], last page. 


springScale 


function springScale 

m = 1; c = 1; k = 100; W = -10; TO = 0.5; 

omega = sqrt(k/m); cc = 2*m*omega; zeta = c/cc; tO = omega*T0; 

6 n = 200; t = linspace(0, 50, n); 

7 for i = l:n 

x(i) = (W/k)*(h(t(i))*(t(i)>0)-h(t(i)-tO)*(t(i)>t0)); 

end 

plot(t/omega, x), grid on 

xlabel('Time (sec)'), ylabel('Displacement (m)') 
title('Respnse of a SDOF System to a Ramp Force') 

[M,I] = min(x); 

text(t(I)/omega, M-0.005, ['Max displacement = ', ... 
num2str(M), ' at ', num2str(t(I)/omega), ' sec.']) 


8 
9 

10 
11 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 end 


function out = h(t) 

out = (1/(t0*sqrt(l-zeta /v 2 ) ) ) ^integral( @fun, 0, t); 
function out = fun(tau) 

out = tau.*exp(-zeta*(t-tau)).*sin((t-tau)*sqrt(l-zeta A 2)); 

end 

end 


Respnse of a SDOF System to a Ramp Force 
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11.7 Double Integral: Volume Under Stadium Dome 


Example 1 l_07.m: Volume of Stadium Dome 

[2] This script calculates the volume under the stadium dome described in [1]. 

1 clear 

2 x = -100:2:100; 

3 y = -60:2:60; 

4 [X, Y] = meshgrid(x, y); 

5 Z = (17200 - X. A 2 - 2*Y. A 2)/200; 

6 surf(X,Y,Z), axis vis3d equal 

7 A = trapz(x, Z, 2); 

8 V = trapz(y, A) 

9 fun = @(s,t) (17200 - s. A 2 - 2*t. A 2)/200; 

10 V = integral2(fun, -100, 100, -60, 60) 

V_ ) 
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11.8 Initial Value Problems 









Example 1 l_08.m: Damped Free Vibrations 

[4] This program solves the IVP defined in Eq. (a), last page. —» 

1 dampedFreeVibration 

2 

3 function dampedFreeVibration 

4 m = 1; c = 1; k = 100; delta = 0.2; 

5 [time, sol] = ode45(@fun, [0,2], [delta, 0]); 

6 plot(time, sol( 2 , 1 )); 

7 xlabel('Time (sec)') 

8 ylabel('Displacement (m)') 

9 yyaxis right 

10 plot(time, sol(:,2)); 

11 ylabel('Velocity (m/s)') 

12 title('Free Vibration of a SDOF Damped System') 

13 grid on 

14 

15 function ydot = fun(t, y) 

16 ydot(1) = y(2); 

17 ydot(2) = (-k*y(1)-c*y(2))/m; 

18 ydot = ydot'; 

19 end 
2 0 end 
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Free Vibration of a SDOF Damped System 



Table 11.8 Summary of Functions for IVPs 

Functions 

Description 

[t, sol] = ode45 (Qfun, tspan, yO) 

Solve nonstiff DEs; medium order method 

[t, sol] = odel5s ( ®fun, tspan, yO) 

Solve stiff DEs and DAEs; variable order method 

[t, sol] = ode23 ( @fun, tspan, yO) 

Solve nonstiff DEs; low order method 

[t, sol] = odell3 (@fun, tspan, yO) 

Solve nonstiff DEs; variable order method 

[t, sol] = ode23t (@fun, tspan, yO) 

Solve moderately stiff ODEs and DAEs; trapezoidal rule 

[t, sol] = ode23tb( @fun, tspan, yO) 

Solve stiff DEs; low order method 

[t, sol] = ode23s ( ®fun, tspan, yO) 

Solve stiff DEs; low order method 

[t, sol] = odel5i( ®fun, tspan, yO ) 

Solve fully implicit DEs, variable order method 

ydot = fun(t, y) 

User-defined function to be input to ODE-IVP solvers 

Details and More: 

Help>MATLAB>Mathematics>Numerical Integration and Differential Equations> Ordinary Differential Equations 
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11.9 IVP: Placing Weight on Spring Scale 


f 

Example ll_09.m: Spring Scale 

A 

[2] This program solves the IVP described in Eq. (a). 


1 

springScale 


3 

function springScale 


4 

m = 1; c = 1; k = 100; W = -10; TO = 0.5; 


5 

[time, sol] = ode45(@fun, [0,5], [0,0]); 


6 

plot(time,sol (:, 1 )) , grid on 


7 

xlabel('Time (sec)'), ylabel (' Displacement 

(m) ' ) 

8 

title (' Response of a SDOF System to a Ramp 

Force ' ) 

9 

[M, I] = min ( sol (: ,1) ) ; 


10 

text ( time( I) , M-0.005, ['Max displacement = 

i 

r • • • 

11 

num2str(M), ' at ' , num2str ( time (I)) , ' 

sec. ' ] ) 

12 



13 

function ydot = fun(t, y) 


14 

force = w*t/T0*(t<T0)+W*(t>=T0) ; 


15 

ydot ( 1 ) = y ( 2 ); 


16 

ydot(2) = ( 1/m) *( force - c*y(2) - k 

*y(i))? 

17 

ydot = ydot '; 


18 

end 


19 

V 

end 

J 




Force (N) 
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Ramp Force Applied on the Spring Scale 
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11.10 ODE-BVP: Deflection of Beams 
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Example 1110.m: Deflection of Beams 

[3] This program solves the BVP defined in Eq. (a), last page. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 


beamDeflection 
function beamDeflection 

w = -0.1; h = 0.1; L = 8; E = 2.1ell; q = 500; 

I = w*h"3/12; 

solinit = bvpinit(linspace(0,L,1000), [1 , 1, 1, 1]); 
sol = bvp4c(@odefun, @bcfun, solinit); 
x = sol.x; y = sol.y(l,:); 
plot(x, y*1000) 

xlabel('x (m)'), ylabel('y (mm)') 

title('Deflection of Uniformly Loaded and Simply Supported Beam') 
[M, I] = min(y); 

text(x(I), M*1000, ['Maximum deflection = ' , num2str(-M*1000)]) 

function yprime = odefun(x, y) 
yprime = zeros(4,1); 
yprime(1) = y(2); 
yprime(2) = y(3) ; 
yprime(3) = y(4); 
yprime(4) = q/(E*I); 

end 

function residual = bcfun(y0, yL) 
residual = zeros(4,l); 
residual(l) = y0(l); 
residual(2) = y0(3); 
residual(3) = yL(l); 
residual(4) = yL(3); 

end 


end 


Deflection of Uniformly Loaded and Simply Supported Beam 
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Table 11.10 Summary of Functions for ODE-BVPs 

Functions 

Description 

sol = bvp4c( Qodefun, Qbcfun, solinit) 

Solve BVPs for ODEs 

sol = bvp5c( Qodefun, Qbcfun, solinit) 

Solve BVPs for ODEs 

solinit = bvpinit(x, yinit) 

Form initial guess for BVP solvers 

yprime = odefun(x, y) 

User-defined function defining the ODE 

residual = bcfun (yO r yL) 

User-defined function defining the BCs 

Details and More: 

Help>MATLAB>Mathematics>Numerical Integration and Differential Equations>Boundary Value Problems 
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11.11 IB VP: Heat Conduction in a Wall 
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Example 1111 .m: Heat Conduction in a Wall 

[3] This program solves the problem defined in Eqs. (a, b, c), last page. —» 

1 heatConduction 

2 

3 function heatConduction 

4 A = 0.4; B = 0.05; Tl = 0.6; 

5 x = linspace(0, 1, 21); 

6 t = linspace(0, 1, 101); 

7 T = pdepe(0, @pdefun, @icfun, @bcfun, x, t); 

8 hold on 

9 for k = [1,6,11,16,21] 

10 plot(t,T(:,k),'k-') 

11 text(0.05,T(6,k), ['x = num2str(x(k))]) 

12 end 

13 xlabel('Nondimensional Time') 

14 ylabel('Nondimensional Temperature') 

15 title('Heat Conduction in a Wall, T(t)') 

16 

17 figure, hold on 

18 for k = [1, 51, 101] 

19 plot(x,T(k,s),'k-') 

20 text(0.3,T(k,7), [’t = ’, num2str(t(k))]) 

21 end 

22 xlabel(’Nondimensional Distance') 

23 ylabel('Nondimensional Temperature') 

24 title('Heat Conduction in a Wall, T(x)') 

25 

26 function [c, f, s] = pdefun(x,t,T,Tprime) 

27 c = 1; 

28 f = Tprime; 

29 s = 1; 

30 end 

31 

32 function Tinit = icfun(x) 

33 Tinit = 1-A*x; 

34 end 

35 

36 function [pa,qa,pb,qb] = bcfun(a,Ta,b,Tb,t) 

37 pa = -B*Ta; 

38 qa = 1; 

39 pb = Tb-Tl; 

40 qb = 0; 

41 end 

42 end 
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Heat Conduction in a Wall, T(t) Heat Conduction in a Wall, T(x) 




Table 11.11 Summary of Functions for PE-IBVPs 

Functions 

Description 

sol = pdep e(m, Qpdefun, Qicfun, Qbcfun , x, t) 

Solve a PE-PDE in 1-D 

[C/f/S] = pdefun(x, t, T, Tprime) 

User-defined function defining the PE-PDE 

TO = icfun(x) 

User-defined function defining the ICs 

[pi r ql,pr r qr] = bcfun(xl r Tl r xr r Tr r t) 

User-defined function defining the BCs 

Details and More: Help>MATLAB>Mathematics>Numerical Integration and Differential Equations> 

Partial Differential Equations>pdepe 





















Chapter 12 

Systems of Nonlinear Equations and 
Optimization 


Applications of optimization 
techniques are ubiquitous; e.g., 
curve fitting. Numerical 
methods for optimization and 
nonlinear equations are closely 
related. Many algorithms for 
solving nonlinear equations are 
based on minimization of 
certain functions. For example, 
in structural mechanics, an 
equilibrium state is equivalent 
to a state in which the system 
has a minimum potential 
energy. This chapter uses many 
functions that are part of the 
Optimization Toolbox. This 
chapter assumes that you have a 
license that includes the 
Optimization Toolbox. 
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12.1 Nonlinear Equations: Intersection of Two Curves 


( 

Example 12_01.m: Intersection of Two Curves 

N 

[2] This program solves the system of nonlinear equations defined in 

Eq. (a). -» 

1 

clear, syms x y 


2 

fimplicit(x A 2/9+y A 2/4 == 1, [-4,4]), hold 

on 

3 

fimplicit(y == x A 2-4, [-4,4]), axis equal 

, grid on, box on 

4 

legend('x A 2/9+y A 2/4 =1', 'y = x~2-4') 


5 

title('Intersection of Two Curves') 


6 

7 

solveTwoCurves 


8 

function solveTwoCurves 


9 

xinit = [-1,-1; 1,-1; -1,1; 1, 1]; 


10 

for k = 1:4 


11 

x = fsolve(@fun, xinit(k,s)); 


12 

text(x(1),x(2), ... 


13 

['x = ', num2str(x(1)), ' y = ' 

, num2str(x(2))], ... 

14 

'HorizontalAlignment', 'center') 


15 

16 

end 


17 

function f = fun(x) 


18 

f = zeros(2,1); 


19 

f(1) = x(l) A 2/9+x(2p2/4-l; 


20 

f(2) = x(1)~2-x(2)-4; 


21 

end 


22 

V 

end 

J 
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Intersection of Two Curves 



Table 12.1 Summary of Functions for Systems of Nonlinear Equations 

Functions 

Description 

x = fsolve(@frin, xO) 

Solve system of nonlinear equations 

f = fun(x) 

User-defined function defining the system of nonlinear equations 

Details and More: Help> Optimization To olbox> Systems of Nonlinear Equations 
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12.2 Kinematics of Four-Bar Linkage 








12.2 Kinematics of Four-Bar Linkage 453 


Example 12 02.m: Four-Bar Linkage 

[2] This program simulates the motion of a four-bar linkage by successively solving Eq. (a), last page. It saves a video 
in a file (in AVI format), so you can replay the simulation. —» 

1 fourBarLinkage 

2 

3 function fourBarLinkage 

4 a = 1.2; b=3; c=2.6; d=3.2; omega = 2*pi; 

5 ta = pi/2; e = sqrt ( a~ 2+d / '2 ) ; 

6 tb = atan(d/a)+acos( (b A 2+e*2-c A 2)/(2*b*e) )-pi/2; 

7 tc = tb + acos( (b /v 2+c A 2-e A 2 ) / ( 2*b*c ) ) - pi; 

8 steps = 50; delta = 2*pi/omega/steps; 

9 x = [0, 0]; 

10 options = optimoptions(@fsolve, 'Display', 'off'); 

11 for k = 1:steps 

12 xcoord = [0, a*cos(ta), d-c*cos(2*pi-tc), d, 0]; 

13 ycoord = [0, a*sin(ta), c*sin(2*pi-tc), 0, 0]; 

14 plot(xcoord, ycoord, 'k-o', 'MarkerFaceColor', 'k') 

15 axis([-2, 5, -2, 4]), grid on 

16 title('Kinematics of Four-Bar Linkage') 

17 Frames(k) = getframe; 

18 x = fsolve(@fun, x, options); 

19 ta = ta + omega*delta; 

20 tb = tb + x(l)*delta; 

21 tc = tc + x(2)*delta; 

22 end 

23 movie(Frames, 5, 30) 

24 videoObj = VideoWriter('Linkage'); 

25 open(videoObj); 

26 writeVideo(videoObj, Frames); 

27 

28 function f = fun(x) 

29 f = zeros(2,1); 

30 f(1) = omega*a*sin(ta)+x(1)*b*sin(tb)+x(2)*c*sin(tc); 

31 f(2) = omega*a*cos(ta)+x(1)*b*cos(tb)+x(2)*c*cos(tc); 

32 end 

33 end 
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Kinematics of Four-Bar Linkage 



- 2-10123 
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12.3 Asymmetrical Two-Spring System 
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Example 12_03.m: Asymmetrical Two-Spring System 

[2] This program solves the problem defined in [1] (last page), producing the graph shown in [3-6]. 

1 asymmetricalTwoSpring 

2 

3 function asymmetricalTwoSpring 

4 kl = 1.5; k2 = 6.8; L = 12; F = 9.2; 

5 LI = @(x,y) sqrt((L+x). A 2+y.^2); 

6 L2 = @(x,y) sqrt((L-x). A 2+y.^2); 

7 dLl = @(x,y) Ll(x,y)-L; 

8 dL2 = @(x,y) L2(x,y)-L; 

9 funl = @(x,y) kl*dLl(x,y).*(L+x)./Ll(x,y)-k2*dL2(x,y).*(L-x)./L2(x,y); 

10 fun2 = @(x,y) kl*dLl(x,y).*y./Ll(x,y)+k2*dL2(x,y).*y./L2(x,y)-F; 

11 fimplicit(funl, [0,5,5,10]), grid on, hold on 

12 fimplicit(fun2, [0,5,5,10]) 

13 title('Asymmetrical Two-Spring System') 

14 

15 sol = fsolve(@fun, [5,5]); 

16 text(sol(1),sol(2) , ... 

17 ['x = ', num2str(sol(1)), ', y = ', num2str(sol(2))], ... 

18 'HorizontalAlignment', 'center') 

19 

20 function f = fun(z) 

21 f = zeros(2,1); 

22 f(l) = funl(z(l), z(2)); 

23 f(2) = fun2(z(1), z(2)); 

24 end 

25 end 

V_ J 
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12.4 Linear Programming: Diet Problem 
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Food 

Serving Size 

Calorie 

Protein 

Calcium 

Price per Serving 

1 

Oatmeal 

28 g 

110 kcal 

4g 

2 mg 

$0.30 

2 

Chicken 

100 g 

205 kcal 

32 g 

12 mg 

$2.40 

3 

Eggs 

2 large 

160 kcal 

13 g 

54 mg 

$1.30 

4 

Whole Milk 

237 cc 

160 kcal 

8g 

285 mg 

$0.90 

5 

Cherry pie 

170 g 

420 kcal 

4g 

22 mg 

$2.00 

6 

Pork and Beans 

260 g 

260 kcal 

14 g 

80 mg 

$1.90 


Reference: http://resources.mpi-infmpg.de/conferences/adfocs-03/Slides/Bixby_l.pdf 


( 

Example 12_04.m: Diet Problem 

[3] This program solves the linear programming problem defined in [2]. —» 


1 

clear 



2 

f = [0.3, 2 

•4, 

1.3, 0.9, 2.0, 1.9]; 

3 

A = -[110, 

205, 

160, 160, 420, 260; 

4 

4, 

32, 

13, 8, 4, 14; 

5 

2, 

12, 

54, 285, 22, 80] 

6 

b = -[2000, 

55, 

800] ; 


7 lb =[000000]; 

8 [x,fval] = linprog(f,A,b,[],[],lb) 

9 

10 [xl,x4] = meshgrid(0:20, 0:14); 

11 cost = 0.3*xl+0.9*x4; 

12 [C, h] = contour(xl, x4, cost, 0:20); clabel(C, h), hold on 

13 syms xl x4 

14 fimplicit(110*xl+160*x4==2000, [0,20]) 

15 fimplicit(4*x1+8*x4==55, [0,20]) 

16 fimplicit(2*xl+285*x4==800, [0,20] ) 

17 axis([0,20,0,14]), xlabel('Oatmeal (x_ 1)'), ylabel('Whole Milk (x_ 2)') 

18 title('Minimum Cost Diet Planning') 


V 
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19 

20 
21 
22 

23 

24 

25 

26 

27 

28 
29 


Optimal solution found. 


14.2443 

0 

0 

2.7071 

0 

0 


fval 


6.7096 


[5] Lines 12-18 produce this graph. It 
shows contours of the objective 
function [6] and three inequality 
constraint functions in the x r x 4 space 
[7-9]. Non-feasible region (area that 
violates any of constraints, see [7]) is 
shaded. The shading is manually 
added by the author. 


Minimum Cost Diet Planning 


[6] These parallel lines are 
contours of the objective function. 


[8] This line represents the 
equation 4x 1 + 8x 4 = 55. 


[9] This line represents the 
equation 2x 1 + 285x 4 = 800. 



How to Determine the Feasible Region? 

[7] This line represents the equation 110;q + 160x 4 = 2000 
(x 2 , x 3 , x 5 , andx 6 are zeros), which divides the x r x 4 space into two 
half-spaces. One half-space represents 110;q + 160x 4 < 2000 and 
the other half-space represents 110jq + 160x 4 > 2000. To determine 
which half-space represents 1 lOjq +160 x 4 > 2000 , one way is to 
substitute the origin into the left-side of the equation. In this case, 
since the origin (which is at lower-left) satisfies 
110jq + 160x 4 < 2000, the region that satisfies 110;q + 160x 4 > 2000 
is the other half-space, i.e., the upper-right. Collection of the points 
that satisfy all constraints (including bounds) are the feasible region. 
In this case, the unshaded area is the feasible region (also see [8, 9]). 


[10] This is the location 
where jq = 14.2443, 
x 4 = 2.7071, at which the 
value of the objective 
function is 6.7096, the 
minimum cost. —> 
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Table 12.4 Summary of 1 inprog 

Function 

Description 

[x,fval] = linprog( f,A,b,Aeq,beq,lb,ub,options) 

Solve linear programming problems 

options = optimoptions(@ solver, name, value, ...) 

Create optimization options structure 

options = optimset (name, value, ...) 

Create optimization options structure 

Details and More: Help> Optimization To olbox> Linear Programming and Mixed-Integer Linear Programming 
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12.5 Mixed-Integer Linear Programming 


Example 12_05a.m 

[2] This program solves the diet problem with the additional constraints that the servings of the eggs (x 3 ) and the whole 
milk (x 4 ) are integer numbers. 

1 clear 


2 

f = 

[0.3, 2 

.4, 

1.3, 0.9, 2.0, 1.9]; 

3 

A = 

-[110, 

205, 

160, 160, 420, 260; 

4 


4, 

32, 

13, 8, 4, 14; 

5 


2, 

12, 

54, 285, 22, 80] 

6 

b = 

-[2000, 

55, 

800]; 

7 

lb = 

o 

o 

o 

0 0 

0]; 


8 intcon = [3, 4]; 

9 [x, fval] = intlinprog(f,intcon, A,b,[],[],lb) 


10 

11 

12 

13 

14 

15 

16 

17 

18 


13.8182 

0 

0 

3.0000 

0 

0 

fval = 


6.8455 
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Object 

Weight 

Value 

1 

45 kg 

$120 

2 

30 kg 

$90 

3 

110 kg 

$200 

4 

73 kg 

$220 

5 

20 kg 

$100 

6 

68 kg 

$150 

7 

49 kg 

$110 

8 

150 kg 

$400 


Example 12_05b.m: Binary Integer Programming 

\ 

[6] This program solves the problem described in [5]. 


19 

clear 


20 

f = -[120,90,200,220,100,150,110,400]; 


21 

intcon = 1:8; 


22 

A = [45,30,110,73,20,68,49,150]; 


23 

b = [280]; 


24 

LB =[00000000]; 


25 

UB =[11111111]; 


26 

[x, fval] = intlinprog(f, intcon. A, b, [], [], LB, UB) 


V 


J 


21 

x = 

28 

0 

29 

1.0000 

30 

0 

31 

1.0000 

32 

1.0000 

33 

0 

34 

0 

35 

1.0000 

36 

fval = 

37 

-810 
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Table 12.5 Summary of Function intlinprog 

Function 

Description 

[x, fval] = intlinprog( f,intcon r A r b r Aeq r beq r lb,ub,options) 

Mixed-integer linear programming 

Details and More: Help> Optimization To olbox> Linear Programming and Mixed-Integer Linear Programming 
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12.6 Unconstrained Single-Variable Optimization 



Example 12_06a.m: Volume of a Paper Container 

[3] This program solves the problem described in [2]. —» 

1 clear 

2 a = 8.5; b = 11; 

3 objective = @(x) (-x.*(a-2*x).*(b-2*x)); 

4 LB = 0; UB = min(a,b)/2; 

5 [x, V] = fminbnd(objective, LB, UB); 

6 fplot(objective, [LB, UB]), axis([0 4 -80 0]) 

7 text(x, V-2, ... 

8 ['Volume = ', num2str(-V), ' at x = ', num2str(x)], 

9 'HorizontalAlignment', 'center') 

10 xlabel('x (in)'), ylabel('-Volume (in A 3)') 

11 title('Volume of Box') 
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Volume of Box 



xfn) 
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f ~ \ 

Example 12_06b.m: Symmetrical Two-Spring System 

[7] This program solves the symmetrical two-spring system described in [6], last page. 

12 clear 

13 k = 6.8; L = 12; F = 9.2; 

14 potential = @(x) (0.5*k*(sqrt(L A 2+x."2)-L)."2*2-F*x); 

15 LB = 0; UB = 10; 

16 [x, PE] = fminbnd(potential, LB, UB); 

17 fplot(potential, [LB, UB]), axis([0 10 -50 0]) 

18 text(x, PE-2, ... 

19 ['Total Potential Energy = ', num2str(PE), ' at x = ', num2str(x)], ... 

20 'HorizontalAlignment', 'center') 

21 xlabel('x (cm)'), ylabel('Total Potential Energy (N-cm)') 

22 title('Total Potential Energy of Two-Spring System') 

V_ ) 


Total Potential Energy of Two-Spring System 



Table 12.6 Summary of fminbnd 

Functions 

Description 

[x,fval] = fminbnd(@ fun,xl r x2,options) 

Find minimum of single-variable function on fixed interval 

f = fun(x) 

Function defining the objective function 

Details and More: Help>MATLAB>Mathematics>Optimization> Optimizer 
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12.7 Unconstrained Multivariate Optimization 



> f 

F 
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Example 12_07.m: Asymmetrical Two-Spring System 

[3] This program solves the problem described in [2] (last page), producing the graph shown in [4]. 

1 asymmetricalTwoSpring 

2 

3 function asymmetricalTwoSpring 

4 kl = 1.5; k2 = 6.8; L = 12; F = 9.2; 

5 LI = @(x,y) sqrt((L+x). A 2+y. A 2); 

6 L2 = @(x,y) sqrt((L-x). A 2+y. A 2) ; 

7 dLl = @(x,y) LI(x,y)-L; 

8 dL2 = @(x,y) L2(x,y)-L; 

9 PE = @(x,y) 0.5*kl*dLl(x,y). A 2 + 0.5*k2*dL2(x,y)."2 - F*y; 

10 [X, Y] = meshgrid(linspace(0,5), linspace(5,10)); 

11 [C, h] = contour (X, Y, PE(X,Y), -60:5:10); 

12 clabel(C, h), xlabel('x'), ylabel('y'), grid on 

13 title('Asymmetrical Two-Spring System') 

14 

15 [sol, fval] = fminunc(@fun, [5,5]); 

16 text(sol(1),sol(2)+0.1, ['fminunc: ', ... 

17 'x = ', num2str(sol(1)), ', y = ', num2str(sol(2)), ... 

18 ' PE = ', num2str(fval)], ... 

19 'HorizontalAlignment', 'center') 

20 

21 [sol, fval] = fminsearch(@fun, [5,5]); 

22 text(sol(1),sol(2)-0.1, ['fminsearch: ', ... 

23 'x = ', num2str(sol(1)), ', y = ', num2str(sol(2)), ... 

24 ' PE = ', num2str(fval)], ... 

25 'HorizontalAlignment', 'center') 

26 

27 function f = fun(z) 
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Table 12.7 Summary of fminunc and f minsearch 

Functions 

Description 

[ x,fval ] = fminunc( Qfun r xO,options) 

Find minimum of an unconstrained multivariable function 

[Xffval ] = fminsearch ($ fun,xO,options) 

Find minimum of an unconstrained multivariable function 

f = fun(x) 

Function defining the objective function 

Details and More: Help> Optimization To olbox> Nonlinear Optimization> Unconstrained Optimization 
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12.8 Multivariate Linear Regression 



XI 

X2 

X3 

X4 

y 

Test 

Melt Temperature 

Injection Speed 

Packing Pressure 

Mold Temperature 

Strength 

no. 

(Degrees C) 

(% of Full Speed) 

(kgf/cm 2 ) 

(Degrees C) 

(N) 

1 

150 

50 

25 

30 

65.7 

2 

150 

70 

50 

40 

73.7 

3 

150 

90 

75 

50 

70.0 

4 

170 

50 

50 

50 

82.9 

5 

170 

70 

75 

30 

97.3 

6 

170 

90 

25 

40 

106.1 

7 

190 

50 

75 

40 

119.0 

8 

190 

70 

25 

50 

110.3 

9 

190 

90 

50 

30 

111.4 
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Example 12_08.m: Injection-Mold Tests 

[2] This program solves the problem described in [1], last page, producing output shown in [3]. 


19 

20 
21 
22 
23 


injectionMoldTest 
function injectionMoldTest 


4 

X = 

[i/ 

150 , 

50, 

25, 

30; 

5 


i. 

150, 

70, 

50, 

40; 

6 


i. 

150, 

90, 

75, 

50; 

7 


i. 

170, 

50, 

50, 

50; 

8 


i. 

170, 

70, 

75, 

30; 

9 


i. 

170, 

90, 

25, 

40; 

10 


i. 

190, 

50, 

75, 

40; 

11 


i. 

190, 

70, 

25, 

50; 

12 


i. 

190, 

90, 

50, 

30]; 

13 







14 

Y = 

[65. 

7, 73 

• 7, 

70.0 

f 82 

15 







16 

PI 

= fminunc( 

@fun 

, [0 

,0,0 

17 

P2 

= lsqlin(X 

:, Y, 

[], 

[]) 

18 

P3 

= X\Y 





function error = fun(P) 
error = norm(X*P-Y); 

end 


end 


24 

PI 

= 

25 


-98.6164 

26 


1.0942 

27 


0.1658 

28 


0.0280 

29 


-0.1867 

30 

P2 

= 

31 


-98.6167 

32 


1.0942 

33 


0.1658 

34 


0.0280 

35 


-0.1867 

36 

P3 

= 

37 


-98.6167 

38 


1.0942 

39 


0.1658 

40 


0.0280 

41 


-0.1867 
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Table 12.8 Summary of Linear Least Squares 

Functions 

Description 

p = lsqlin ( C, d, A r b, Aeq, beq, lb, ub, options) 

Solve constrained linear least-square problems 

x = A\b (mldivide) 

Solve systems of linear equations Ax = b for x 

Details and More: Help> Optimization Toolbox> Least Squares> Linear Least Squares 
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12.9 Non-Polynomial Curve Fitting 


Strain (Dimensionless) 

0 

0.0227 

0.0557 

0.0880 

0.1203 

0.1524 

0.1840 

0.2154 

0.2475 

0.2797 

Stress (psi) 

0 

20.35 

38.29 

52.12 

63.74 

73.77 

82.80 

91.13 

99.07 

106.58 


Example 12_09a.m: Polynomial Curve Fitting 

[2] This program fits the data in [1] with polynomials of degrees 1, 2, and 3 and shows the errors. —» 

1 clear 

2 strain = [0,0.0227,0.0557,0.0880,0.1203,0.1524,0.1840,0.2154,0.2475,0.2797]; 

3 stress = [0, 20.35, 38.29, 52.12, 63.74, 73.77, 82.80, 91.13, 99.07,106.58]; 

4 

5 for k = 1:3 

6 P = polyfit(strain, stress, k); 

7 x = linspace(0,0.3); 

8 y = polyval(P, x); 

9 subplot(2,2,k) 

10 plot(strain, stress, 'o', x, y) 

11 axis([0,0.3,0,120]) 

12 xlabel('Strain (Dimensionless)') 

13 ylabel('Stress (psi)') 

14 title(['Polynomial of Degree ', num2str(k)]) 

15 error = norm(stress-polyval(P,strain)); 

16 text(0.1, 10, ['Error = ', num2str(error)]) 

17 end 


V 














Stress (psi) Stress 
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Polynomial of Degree 1 Polynomial of Degree 2 



Polynomial of Degree 3 



03 
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Example 12_09b.m: Non-Polynomial Curve Fitting 

[5] This program fits the data listed in [1] with a function of the form a = ae b , where a is the stress, e is the strain, and 
a and b are parameters to be determined. The functions lsqcurvef it and lsqnonlin (Table 12.9, next page) are 
used for the non-polynomial curve fittings. Both functions have the same result; the difference is the way they specify 
the user-defined functions, explained in [8], next page. 

18 clear 

19 strain = [0,0.0227,0.0557,0.0880,0.1203,0.1524,0.1840,0.2154,0.2475,0.2797]; 

20 stress = [0, 20.35, 38.29, 52.12, 63.74, 73.77, 82.80, 91.13, 99.07,106.58]; 

21 

22 funl = @(p, xdata) p(1)*xdata. A p(2); 

23 fun2 = @(p) p(1)*strain. A p(2)-stress; 

24 p0 = [0, 0]; 

25 [pi, errl] = lsqcurvefit(funl, pO, strain, stress) 

26 [p2, err2] = lsqnonlin(fun2, pO) 

27 e = linspace(0, 0.3); 

28 s = pi(1)*e. A pl(2); 

29 plot(strain, stress, 'ko', e, s, 'k—') 

30 xlabel('Strain (\epsilon. Dimensionless)'), ylabel('Stress (\sigma, psi)') 

31 text(0.1, 20, ['\sigma = ', num2str(pi(1)), '\times\epsilon A {', ... 

32 num2str(pi(2)),'}']) 

33 text(0.1, 10, ['Error = ', num2str(errl)]) 

34 legend('Experimental Data', 'Fitting Curve', 'Location', 'southeast') 

35 title('Stress-Strain Relationship') 

V_ J 


36 pi = 

37 240.4015 0.6326 

38 errl = 

39 4.7698 

40 p2 = 

41 240.4015 0.6326 

42 err2 = 

43 4.7698 


Stress-Strain Relationship 
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Table 12.9 Summary of Functions lsqcurvefit and lsqnonlin 

Functions 

Description 

[ p,err] = lsqcurvefit( Qfunl,pO r x,y,lb,ub,options) 

Solve nonlinear curve-fitting problems 

[p, err] = lsqnonlin( Qfun2,p0,lb r ub r options) 

Solve nonlinear curve-fitting problems 

f = funl(p, xdata) 

Function to fit 

f = fun2(p) 

Function whose sum of squares is 
minimized 

Details and More: Help> Optimization Toolbox> Least Squares> Nonlinear Least Squares (Curve Fitting) 
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12.10 Constrained Optimization 
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Example 12_10.m: Parabolically Deflected Beam 


[4] This 

1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 


program solves the problem defined in [3], last page. —» 
parabolicBeam 


function parabolicBeam 

w = 1; h = 0.01; L = 8; E = 210e9; maxSigma = 200e6; deltaCenter = 0.5; 
nF = 3; a = L/8*[1,2,3]; F0 = [0,0,0]; LB = [0,0,0]; UB = [inf,inf,inf]; 
nx = 20; x = linspace(0,L,nx); savedDelta = zeros(l,nx); savedP = [0,0,0]; 
I = w*h"3/12; 

[F, err] = fmincon(@fun, F0, [],[],[],[], LB, UB, @nonlcon) 

plot(x, -savedDelta, 'ko', x, -polyval(P, x), 'k-') 

axis([0, L, -deltaCenter, 0]) 

xlabel('Distance (m)'), ylabel('Deflection (m)') 

legend('Beam Deflections', 'Fitting Parabola', 'Location', 'north') 
title('Parabolically Deflected Beam') 


function err = fun(F) 

delta = zeros(l,nx); 
for k = IsnF 

delta = delta + deflection(F(k), a(k), x); 
delta = delta + deflection(F(k), L-a(k), x); 

end 

P = polyfit(x, delta, 2); 

err = norm(delta - polyval(P, x)); 

savedDelta = delta; savedP = P; 

end 


function [c,ceq] = nonlcon(F) 
sigma = 0; delta = 0; 
for k = l:nF 

delta = delta 


sigma = sigma 
delta = delta 


sigma = sigma 


deflection(F(k), a(k), L/2); 
stress(F(k), a(k)); 
deflection(F(k), L-a(k), L/2); 
stress(F(k), L-a(k)); 


end 


c(l) = sigma - maxSigma; 
ceq(l) = delta - deltaCenter; 


end 


function delta = deflection(F, a, x) 

R = F/L*(L-a); 

theta = F*a/(6*E*I*L)*(2*L-a)*(L-a); 

delta = theta*x-R*x."3/(6*E*I)+F/(6*E*I)*((x>a).*((x-a)."3)); 

end 


function sigma = stress(F, a) 
M = F*a/2; 
sigma = M*(h/2)/I; 

end 


end 



12.10 Constrained Optimization 481 


F = 

508.1194 325.1898 0.0144 

err = 

0.0210 
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Table 12.10 Summary of fmincon 

Functions 

Description 

[ x,fval ] = fmincon(@ fun,xO,A,b,Aeq , beq , lb,ub,nonicon,options) 

Constrained optimization 

f = fun(x) 

Objective function 

[c,ceq] = nonlcon(x) 

Constraints 

Details and More: Help> Optimization To olbox> Nonlinear Optimization> Constrained Optimization 









Chapter 13 

Statistics 


Statistics is a powerful tool for 
engineers, but comprehending 
statistics theories is often 
challenging for a junior college 
student. Statistics theories are 
easier to comprehend by means 
of statistics experiments, and 
MATLAB is a perfect tool to 
conduct statistics experiments, 
as demonstrated in this chapter. 
This chapter uses many 
functions that are part of the 
Statistics and Machine 
Learning Toolbox. This 
chapter assumes that you have a 
license that includes this 
toolbox. 
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13.10 F-Distribution 513 
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13.1 Descriptive Statistics 


510.75 

536.68 

454.82 

517.24 

506.38 

473.85 

491.33 

506.85 

571.57 

555.39 

473.00 

560.70 

514.51 

498.74 

514.29 

495.90 

497.52 

529.79 

528.18 

528.34 

513.43 

475.85 

514.34 

532.60 

509.78 

520.69 

514.54 

493.93 

505.88 

484.25 

517.77 

477.06 

478.62 

483.81 

441.11 

528.77 

506.50 

484.90 

527.41 

465.77 

497.96 

495.17 

506.38 

506.26 

482.70 

499.40 

496.70 

512.55 

521.87 

522.19 

482.73 

501.55 

475.72 

477.73 

499.86 

530.65 

484.61 

507.43 

495.49 

522.35 

478.22 

500.65 

511.05 

522.01 

530.88 

501.72 

470.17 

485.15 

478.77 

547.01 

487.69 

514.96 

496.15 

517.77 

484.70 

471.95 

471.55 

509.76 

496.45 

496.08 

528.39 

505.83 

503.96 

531.75 

483.91 

513.93 

516.70 

495.13 

504.31 

476.68 

477.04 

502.10 

514.45 

551.71 

486.66 

503.75 

498.35 

461.34 

491.22 

464.11 

516.81 

482.24 

502.00 

489.11 

506.07 

487.99 

509.80 

514.79 

534.24 

496.12 

457.23 

483.21 

527.09 

478.56 

519.22 

502.48 

528.73 

460.78 

496.05 

475.84 

558.16 

516.50 

527.58 

478.84 

490.63 

494.55 

521.97 

494.44 

514.03 

458.96 

492.92 

483.53 

468.46 

510.16 

505.64 

500.67 

473.33 

522.55 

507.00 

494.02 

500.46 

494.76 

465.00 

494.29 

483.37 

480.42 

476.87 

489.33 

459.95 

519.28 

510.40 

499.60 

499.30 

484.04 

520.37 

497.34 

485.71 

527.03 

495.50 

488.22 

494.12 

483.04 

477.60 

550.52 

533.11 

506.15 

474.86 

482.69 

496.47 

515.83 

473.36 

453.40 

471.02 

506.67 

507.83 

509.03 

497.39 

503.67 

490.48 

517.24 

472.77 

509.10 

483.03 

493.30 

511.06 

520.78 

477.65 

525.21 

513.20 

498.64 

496.10 

495.65 

493.94 

500.46 

501.03 

516.52 

530.54 

509.34 

495.81 

512.50 
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Example 13_01a.m: Random Numbers Generation 

[3] The 200 data in [1] is actually generated by the following commands 

1 clear 

2 rng(0) 

3 data = normrnd(500,20,1,200); 


Example 13_01b.m: Descriptive Statistics 

[5] This script uses the data generated in Example 13 0la.m, so please execute this script right after the execution of 
Example 13 0 la.m. This script introduces some basic terms in Descriptive Statistics, such as mean and standard 
deviation, producing a graphic output shown in [6], next page. 

4 mx = max(data) 

5 mn = min(data) 

6 edges = 410:20:590; 

7 counts = histcounts(data, edges); 

8 x = 420:20:580; 

9 bar(x, counts, 0.95) 

10 axis([400,600,0,90] ) 

11 xlabel('Thickness (Micrometers)'), ylabel('Number of Occurrences') 

12 text(x,counts+3,strsplit(num2str(counts)),'HorizontalAlignment','center') 

13 

14 text(405, 80, ['Number of Samples = ', num2str(length(data))]) 

15 text(405, 75, ['Maximum = ', num2str(mx)]) 

16 text(405, 70, ['Minimum = ', num2str(mn)]) 

17 text(405, 65, ['Mean = ', num2str(mean(data))]) 

18 text(405, 60, ['Standard Deviation = ', num2str(std(data))]) 

19 

20 cumCounts = cumsumfcounts); 

21 yyaxis right 

22 plot(x, cumCounts, 'Marker', 'o') 

23 ylabel('Cumulative Occurrences') 

24 text(x+2, cumCounts, strsplit(num2str(cumCounts))) 

25 legend('Occurences', 'Cumulative Occurrences', 'Location', 'east') 

26 title('Occurrences vs. Thickness') 
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Cumulative Occurrences 
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( 3 % 

Example 13_01c.m: Probability 

[8] This script uses data generated in Example 13 0lb.m, so please execute this script right after the execution of 
Example 13 0lb.m. This script introduces the terms such as probability and cumulative probability, producing an 
graphics output shown in [9]. 

27 figure 

28 p = counts/length(data); 

29 bar(x, p, 0.95) 

30 xlabel('Thickness (Micrometers)'), ylabel('Probability') 

31 text(x, p+0.015, strsplit(num2str(p)), 'HorizontalAlignment', 'center') 

32 

33 cumP = cumsum(p); 

34 yyaxis right 

35 plot(x, cumP, 'Marker', 'o') 

36 ylabel('Cumulative Probability') 

37 text(x+2, cumP, strsplit(num2str(cumP))) 

38 legend('Probability', 'Cumulative Probability', 'Location', 'east') 

39 title('Probability vs. Thickness') 

V_ ) 


Probability vs. Thickness 



Thickness (Micrometers) 
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( * % 

Example 13_01d.m: Probability Density 

[11] This script uses data generated in Example 13 0lc.m, so please execute this script right after the execution of 
Example 13 0lc.m. This script introduces terms such as probability density, producing a graphic output shown in [12]. 

40 figure 

41 pd = p/20; 

42 bar(x, pd, 0.95) 

43 xlabel('Thickness (Micrometers)'), ylabel('Probability Density') 

44 text(x, pd+0.00075, strsplit(num2str(pd)), 'HorizontalAlignment','center') 

45 

46 cumPD = cumsum(pd)*20; 

47 yyaxis right 

4 8 plot(x, cumPD, 'Marker', 'o') 

49 ylabel('Cumulative Probability') 

50 text(x+2, cumPD, strsplit(num2str(cumPD))) 

51 legend('Probability Density', 'Cumulative Probability', 'Location','east') 

52 title('Probability Density vs. Thickness') 

V_ ) 


Probability Density vs. Thickness 



Thickness (Micrometers) 


0.8 

0.7 

0.6 

08 

0.4 

08 

0 2 

0.1 
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Table 13.1a Random Number Generation 

Functions 

Description 

x = rand (row, col) 

Generates random numbers of uniform distribution 

x = randi( imax, row, col) 

Generates random integer numbers of uniform distribution 

x = randn(row, col) 

Generates random numbers of standard normal distribution 

x = normrnd(mu, sigma, row, col) 

Generates random numbers of normal distribution 

rng( seed) 

Controls random number generation 

Details and More: Help>MATLAB>Mathematics> Random Number Generation 


Table 13.1b Descriptive Statistics 

Functions 

Description 

m = mean (data) 

Average or mean value of an array of numbers 

s = std (data) 

Standard deviation of an array of numbers 

v = var (data) 

Variance of an array of numbers 

counts = histcounts (data, edges) 

Histogram bin counts 

[counts, edges] = histcounts( data,nbins) 

Histogram bin counts 

histogram( data, edges) 

Histogram plot 

histogram( data,nbins) 

Histogram plot 

histfit( data,nbins) 

Histogram with a distribution fit 

Details and More: Help>MATLAB>Data Import and Analysis> Descriptive Statistics 























490 Chapter 13 Statistics 


13.2 Normal Distribution 


r ; \ 

Example 13_02a.m: Normal Distribution 

[2] This script produces text output shown in [3] and graphic output shown in [4-6], next page. —» 

1 clear 

2 rng(0) 

3 mu = 500; sigma = 20; n = 200; 

4 data = normrnd(mu, sigma, 1, n); 

5 normplot(data) 

6 [xbar,s] = normfit(data) 

7 

8 x = linspace(mu-5*sigma, mu+5*sigma); 

9 pdf = normpdf(x, mu, sigma); 

10 cdf = normcdf(x, mu, sigma); 

11 figure 

12 plot(x, pdf) 

13 yyaxis right, plot(x, cdf), grid on 

14 legend('Probability Distribution Function', ... 

15 'Cumulative Distribution Function', ... 

16 'Location', 'southeast') 

17 title('Normal Distribution: mu = 500, sigma = 20') 

18 defectRatel = normcdf(440,mu,sigma) + (1-normcdf(560,mu,sigma)) 

19 

20 x = linspace(-5, 5); 

21 pdf = normpdf(x); 

22 cdf = normcdf(x); 

23 figure 

24 plot(x, pdf), x, cdf) 

25 yyaxis right, plot(x, cdf), grid on 

26 legend('Probability Distribution Function', ... 

27 'Cumulative Distribution Function', ... 

28 'Location', 'southeast') 

29 title('Standard Normal Distribution: mu = 0, sigma = 1') 

30 defectRate2 = normcdf(-3) + (1-normcdf(3)) 

V___ \ _ ) 
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31 

xbar = 

32 

500.5040 

33 

s = 

34 

21.7655 

35 

defectRatel 

36 

0.0027 

37 

defectRate2 

38 

0.0027 


Normal Probability Plot 



Normal Distribution: mu =500, sigma = 20 




Standard Normal Distribution: mu = 0, sigma = 1 
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13.2 Normal Distribution 493 


Example 13_02b.m: Mean and Standard Deviation 

[9] This script, producing output shown in [10], confirms the interpretations in [8], last page. 

39 clear 

40 mu = 500; sigma = 20; 

41 funl = @(x) x.*normpdf(x, mu, sigma); 

42 fun2 = @(x) (x-mu).^2.*normpdf(x, mu, sigma); 

43 mean = integral(funl, -1000, 1000) 

44 stdev = sqrt(integral(fun2, -1000, 1000)) 


A 


y 


45 mean = 

46 500.0000 

47 stdev = 

48 20.0000 


Table 13.2 Normal Distribution 

Functions 

Description 

data = normrnd(inu, sigma, row, col) 

Generates random numbers of normal distribution 

normplot( data) 

Generate a normal probability plot 

[xbar,s] = normfit( data) 

Normal parameter estimates 

pd = normpdf(x, mu, sigma) 

Returns probability density of normal distribution 

p = normcdf(x, mu, sigma) 

Returns probability of normal distribution 

x = norminv(p, mu, sigma) 

Returns x-value of normal distribution 

Details and More: Help>Statistics and Machine Learning Toolbox>Probability Distributions> 

Continuous Distributions>Normal Distribution 
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13.3 Central Limit Theory 


Example 13_03a.m: Dice-Throwing Experiments 

[2] This script simulates the series of experiments described in [1], producing the graphs [3-7], next page. —» 

1 clear 

2 n = 50000; 

3 rng(0) 

4 for m= [1,2,3,5,10] 

5 data = mean(randi(6,m,n),1); 

6 x = Is(1/m) :6; 

7 edges = (l-l/m/2):(1/m):(6+l/m/2); 

8 pd = histcounts(data,edges)/n/(1/m); 

9 figure 

10 bar(x, pd, 1.0, 'FaceColor', 'none', 'EdgeColor', 'k') 

11 axis([0,7,0,0.8]) 

12 text(5, 0.30, ['Mean = ', num2str(mean(data))]) 

13 text(5, 0.25, ['Variance = ', num2str(var(data))]) 

14 xlabel(['Average Scores of ', num2str(m), ' Dice']) 

15 ylabel('Probability Density') 

16 title(['Distribution of Average Scores from Throwing ',num2str(m),' Dice']) 

17 end 

V_ J 
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Example 13_03b.m: Demonstration of Central Limit Theory 

[10] Using the dice-throwing experiments, this script, producing a graphic output shown in [11] (next page), confirms 
that z, defined in Eq. (b), indeed approaches a standard normal distribution. 

18 clear 

19 n = 50000; 

20 rng(0) 

21 data = randi(6,1,n); 

22 mu = mean(data); 

23 sigma = std(data); 

24 

25 m = 10; 

26 data = mean(randi(6,m,n)); 

27 data = (data - mu)/(sigma/sqrt(m)); 

28 z = ((1:(1/m):6)-mu)/(sigma/sqrt(m)); 

29 edges = (((1-1/m/2)s(1/m)s(6+1/m/2))-mu)/(sigma/sqrt(m)); 

30 pd = histcounts(data,edges)/n/(1/m/(sigma/sqrt(m))); 

31 plot(z,pd,'o'), grid on, hold on 

32 axis([-5,5,0,0.5]) 

33 x = linspace(-5,5); 

34 plot(x, normpdf(x)) 

35 legend('Simulated Data', 'Standard Normal Distribution') 

36 area = trapz(z,pd); 

37 text(0,0.1,['Area = ', num2str(area)], 'HorizontalAlignment', 'center') 

38 xlabel('z = (xbar-\mu)/(\sigma/\surdm)') 

39 ylabel('Probability Density') 

40 title('Demonstration of Central Limit Theory') 

V_____ ) 
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Demonstration of Central Limit Theory 



z = (xbar-// )/(a/\/m) 
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13.4 Confidence Interval 


Standard Normal Distribution 



Standardized Data, z 
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Difference of Two Means (micrometers) 


Example 13_04.m: Confidence Interval 

[6] This script generates the graph shown in [4, 5]. # 

1 clear 

2 x = linspace(-7,7); sigma = sqrt(2); 

3 plot(x,normpdf(x,0,sigma),'k'), hold on, box off 

4 h = gcf; h.Color = 'w'; 

5 axis([-7, 7,0,0.3 ] ) 

6 z = norminv(0.025,0,sigma); pd = normpdf(z,0,sigma); 

7 plot([z,z], [0,pd], 'k') 

8 z = norminv(0.975,0,sigma); pd = normpdf(z,0,sigma); 

9 plot([z,z], [0,pd], 'k') 

10 z = 0.504; 

11 plot([z,z], [0,0.3], 'k') 

12 xlabel('Difference of Two Means (micrometers)') 

13 ylabel('Probability Density') 

J 


v 
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13.5 Chi-Square Distribution 


Example 13_05a.m: Chi-Square Distribution 

[3] This script generates chi-square distributions (see [4-6], next page). If the sample size is 200 (replacing 5 with 200 
in line 2, i.e., m = 2 0 0), the chi-square distributions are shown in [7]. —» 

1 clear 

2 mu = 500; sigma =20; m = 5; 

3 n = 50000; rng(0) 

4 data = normrnd(mu, sigma, m, n); 

5 s = std(data); 

6 chi2 = (m-1) *s . A 2/sigma^2 ; 

7 mx = max(chi2); bins = 40; 

8 width = mx/bins; 

9 edges = 0:width:mx; 

10 pd = histcounts(chi2, edges)/n/width; 

11 x = width/2:width:mx-width/2; 

12 plot(x, pd, 'ko'), hold on 

13 h = gcf; h.Color = 'w'; 

14 x = linspace(0,mx); 

15 pd = chi2pdf(x, m-1); 

16 plot(x, pd, 'k-') 

17 xlabel('Chi-Square') 

18 ylabel('Probability Density') 

19 title(['Chi-Square Distribution with ', ... 

20 num2str(m-1), ' Degrees of Freedom']) 

21 legend('Simulation Data', 'By MATLAB Function') 

V_ ij _J_ ) 
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Chi-Square Distribution with 4 Degrees of Freedom 



Chi-Square Distribution with 199 Degrees of Freedom 



30 

















502 Chapter 13 Statistics 















13.5 Chi-Square Distribution 503 


Example 13_05b.m: Chi-Square Test 

[12] This script generates a graph shown in [10, 11] and text output shown in [13]. 

22 clear 

23 s = 21.7655; m = 200; sigma = 20; 

24 chi2 = (m-1) *s/sigma /v 2 

25 

26 x = linspace(0,300); 

27 pd = chi2pdf(x, m-1); 

28 plot(x, pd, 'k-'), hold on, box off 

29 h = gcf; h.Color = 'w'; 

30 plot([chi2, chi2], [0, 0.025], ' k- ' ) 

31 

32 lower = chi2inv(0.025, m-1) 

33 plot([lower, lower], [0, chi2pdf(lower,m-1)], 'k—') 

34 upper = chi2inv(0.975, m-1) 

35 plot([upper, upper], [0, chi2pdf(upper,m-1)], 'k-') 

36 xlabel('Chi-Square') 

37 ylabel('Probability Density') 

V_ ) 


38 chi2 = 

39 235.6842 

40 lower = 

41 161.8262 

42 upper = 

43 239.9597 
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Example 13_05c.m: Chi-Square Test 

[15] This script calculates the significance level (lines 45-50). it also demonstrates the use of the function vartest to 
perform a chi-square test (line 52). 

44 clear 

45 rng(0) 

46 mu = 500; sigma = 20; m = 200; 

47 data = normrnd(mu, sigma, 1, m); 

48 s = std(data) ; 

49 chi2 = (m-1) *s A 2/sigma A 2 ; 

50 pi = chi2cdf(chi2, m-1, 'upper')*2 

51 

52 [h, p2 ] = vartest (data, sigma A 2) 

v_ ) 


53 pi = 

54 0.0768 

55 h = 

56 0 

57 p2 = 

58 0.0768 


Table 13.5 Chi-Square Distribution 

Functions 

Description 

pd = chi2pdf(x, dof) 

Returns probability density of chi-square distribution with specified dof 

p = chi2cdf(x, dof) 

Returns cumulative probability of chi-square distribution with specified dof 

x = chi2inv(p, dof) 

Returns chi-square value, given cumulative probability 

[h,p] = vartest( data, dof) 

Chi-square variance test 

Details and More: Help> Statistics and Machine Learning Toolbox> Probability Distributions> Continuous 

Distributions>Chi-Square Distribution 

And: Help>Statistics and Machine Learning Toolbox>Hypothesis Tests 
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13.6 Student’s ^-Distribution 
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Example 13_06.m: Student's t-Distribution 

[3] This script generates a graphic output shown in [4, 5], next page. 

1 clear 

2 mu = 500; sigma = 20; m = 5; 

3 n = 50000; rng(0) 

4 data = normrnd(mu, sigma, m, n); 

5 xbar = mean(data); 

6 s = std(data); 

7 t = (xbar-mu)./(s/sqrt(m)); 

8 

9 mn = -5; mx = 5; bins = 40; 

10 width = (mx-mn)/bins; 

11 edges = mn:width:mx; 

12 pd = histcounts(t, edges)/n/width; 

13 x = mn+width/2:width:mx-width/2; 

14 plot(x, pd, 'ko'), hold on 

15 h = gcf; h.Color = 'w'; 

16 

17 x = linspace(mn,mx); 

18 pd = tpdf(x, m-1); 

19 plot(x, pd, 'k-') 

20 

21 pd = normpdf(x); 

22 plot(x, pd, 1 b—') 

23 

24 xlabel('t') 

25 ylabel('Probability Density') 

26 title(['Student''s t-Distribution with ', ... 

27 num2str(m-1), ' Degrees of Freedom']) 

28 legend('Simulation Data', 'By MATLAB Function') 
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Student's t-Distribution with 4 Degrees of Freedom 



t 


Table 13.6 Student's ^-Distribution 

Functions 

Description 

pd = tpdf(t, dof) 

Returns probability density of /-distribution with specified dof 

p = tcdf(t, dof) 

Returns cumulative probability of /-distribution with specified dof 

t = tinv(p, dof) 

Returns / value, given cumulative probability 

Details and More: Help> Statistics and Machine Learning To o lb ox> Probability Distributions> Continuous 


Distributions>Student's t Distribution 
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13.7 One-Sample t-Test: Voltage of Power Supply 


Example 13_07.m: Voltage of Power Supply 


[2] This script calculates the significance level (lines 2-8). It also demonstrates the use of the function ttest to 

perform the one-sample Mest (line 10). 



1 

clear 



2 

mu = 100; 



3 

data = [126, 101, 105, 103, 98, 

108, 107, 125, 107, 99]; 


4 

m = length(data); 



5 

xbar = mean(data); 



6 

s = std(data); 



7 

t = (xbar-mu)/(s/sqrt(m)) 



8 

pi = tcdf(t, m-1, 'upper')*2 

11 

t = 

9 


12 

2.5280 

10 

[h, p2] = ttest(data, mu) 

13 

Pi = 

V 


14 

0.0323 



15 

h = 



16 

1 



17 

p2 = 



18 

0.0323 
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Student's t-Distribution with 9 Degrees of Freedom 



Table 13.7 One-Sample t -Test 


Functions 


Description 


[h,p] = ttest (data, m) 


One-sample Mest 


[h,p] = ttest (datal, data2) 


Paired-sample Mest 


Details and More: Help>Statistics and Machine Learning Toolbox>Hypothesis Tests 
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13.8 Linear Combinations of Random Variables 


Example 13_08.m: Mean and Variance 

[2] This script confirms the properties in [1] by conducting simulations. 

1 clear 

2 muX = 10; muY = 20; varX = 1; varY = 2; 

3 n = 50000; 

4 rng(0) 

5 dataX = normrnd(muX, sqrt(varX), 1, n); 

6 dataY = normrnd(muY, sqrt(varY), 1, n); 

7 data = dataX + dataY; 

8 mul = mean(data) 

9 varl = var(data) 

10 data = dataX - dataY; 

11 mu2 = mean(data) 

12 var2 = var(data) 

13 data = dataX*3; 

14 mu3 = mean(data) 

15 var3 = var(data) 

16 data = dataX/3; 

17 mu4 = mean(data) 

18 var4 = var(data) 

19 data = dataX*3 + dataY*2; 

20 mu5 = mean(data) 

21 var5 = var(data) 

V___ ) 


22 mul = 

23 29.9990 

24 varl = 

25 2.9874 

26 mu2 = 

27 -10.0049 

28 var2 = 

29 2.9795 

30 mu3 = 

31 29.9911 

32 var3 = 

33 8.9242 

34 mu4 = 

35 3.3323 

36 var4 = 

37 0.1102 

38 mu5 = 

39 69.9950 

40 var5 = 

41 16.9154 
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13.9 Two-Sample t- Test: Injection Molded Plastic 



Tensile Strength (kgf) 

Sample 

Mean 

Sample 

Variance 

Process 1. 

75 

78 

65 

65 

79 

77 

75 

69 

72.1 

30.7 

Without Additive 

74 

79 

66 

67 

64 

68 

76 

76 

Process 2. 

79 

77 

75 

70 

78 

68 

71 

77 

75.1 

15.2 

With Additive 

79 

74 

73 

78 

72 

74 

83 

74 


Example 13_09.m: Injection Molded Plastic 

[2] This script calculates the significance level (lines 2-15). It also demonstrates the use of the function ttest2, which 
performs a two-sample Mest (line 17), a similar procedure in lines 6-15. 


1 

2 

clear 

datal = 

[75, 

78, 

65, 

65, 

79, 

77, 

75, 

69, . . . 

3 


74, 

79, 

66, 

67, 

64, 

68, 

76, 

76]; 

4 

data2 = 

[79, 

77, 

75, 

70, 

78, 

68, 

71, 

77, ... 

5 


79, 

74, 

73, 

78, 

82, 

74, 

83, 

74]; 


6 ml = length(datal) 

7 m2 = length(data2) 

8 xbarl = mean(datal) 

9 xbar2 = mean(data2) 

10 varl = var(datal) 

11 var2 = var(data2) 

12 varPooled = (varl*(ml-1)+var2*(m2-l))/((ml-1)+(m2-l)) 

13 varDiffAve = varPooled/ml + varPooled/m2 

14 t = (xbarl-xbar2)/sqrt(varDiffAve) 

15 pi = tcdf(t, (ml-l)+(m2-l))*2 

16 

17 [h, p2] = ttest2(datal, data2) 


v 
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18 ml = 

19 16 

20 m2 = 

21 16 

22 xbarl = 

23 72.0625 

24 xbar2 = 

25 75.7500 

26 varl = 

27 30.7292 

28 var2 = 

29 17.2667 

30 varPooled = 

31 23.9979 

32 varDiffAve = 

33 2.9997 

34 t = 

35 -2.1291 

36 pi = 

37 0.0416 

38 h = 

39 1 

40 p2 = 

41 0.0416 


Table 13.9 Two-Sample ?-Test 

Functions 

Description 

[h,p] = ttest2( datal , data2) 

Two-sample /-test 

Details and More: Help>Statistics and Machine Learning Toolbox>Hypothesis Tests 
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13.10 F-Distribution 


Example 13_10.m: F-Distribution 

[2] This script generates F-distributions as shown in [3-5], next page. —» 

1 clear 

2 mu = 500; sigma = 20; ml = 6; m2 = 16; 

3 n = 50000; rng(0) 

4 datal = normrnd(mu, sigma, ml, n); 

5 data2 = normrnd(mu, sigma, m2, n); 

6 vl = var(datal); 

7 v2 = var(data2); 

8 F = vl./v2; 

9 

10 mx = 6; bins = 40; 

11 width = mx/bins; 

12 edges = 0:width:mx; 

13 pd = histcounts(F, edges)/n/width; 

14 x = width/2:width:mx-width/2; 

15 plot(x, pd, 'ko'), hold on 

16 h = gcf; h.Color = 'w'; 

17 

18 x = linspace(0,mx); 

19 pd = fpdf(x, ml-1, m2-l); 

20 plot(x, pd, 'k-') 

21 

22 xlabel('F ' ) 

23 ylabel('Probability Density') 

24 title(['F-Distribution with Degrees of Freedom ', ... 

25 num2str(ml-1), '/', num2str(m2-l)]) 

26 legend('Simulation Data', 'By MATLAB Function') 
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F-Distribution with Degrees of Freedom 5/15 



F 


Table 13.10 F-Distribution 

Functions 

Description 

pd = fpdf(F, dofl, dof2) 

Returns probability density of F-distribution 

p = fcdf(F, dofl, dof2) 

Returns cumulative probability of /-distribution 

F = finv(p, dofl r dof2) 

Returns F value, given cumulative probability 


Details and More: 

Help>Statistics and Machine Learning Toolbox>Probability Distributions>Continuous Distributions>F Distribution 
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13.11 Two-Sample F-Test: Injection Molded Plastic 


Example 13_11 .m: Injection Molded Plastic 

[2] This script calculates the significance level (lines 2-10). It also demonstrates the use of the function vartest2 to 
perform a two-sample F-test (line 12), a similar procedure in lines 6-10. 

1 clear 


2 

datal = [75, 

00 

65, 

65, 

79, 

77, 

75, 

69, 

3 

74, 

79, 

66, 

67, 

64, 

68, 

76, 

76]; 

4 

data2 = [79, 

77, 

75, 

70, 

78, 

68, 

71, 

77, 

5 

79, 

74, 

73, 

78, 

82, 

74, 

83, 

74]; 


6 ml =16; m2 =16; 

7 varl = var(datal) 


8 

9 

10 

11 

12 

var2 = var(data2) 

F = varl/var2 

pi = fcdf(F, ml-1, m2-l, 

[h, p2] = vartest2(datal, 

'upper')*2 

data2) 

13 

14 

15 

16 

17 

varl = 

30.7292 

var2 = 

17.2667 

F = 




18 

1.7797 




19 

pi = 




20 

0.2755 




21 

h = 




22 

0 




23 

p2 = 




24 

0.2755 
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F-Distribution with Degrees of Freedom 15/15 



[5] The F-value is 1.78 
(see lines 17-18). 


[6] The probability that an F -value is more than 1.78 is 
27.55%, greater than the threshold 5%. Thus we have no 
strong evidence to reject but to accept the assumption (that 
both set of samples come from the same population). # 


0 

0 1 2 3 4 5 

F 

6 

Table 13.11 Two-Sample F-Test 

Functions 

Description 

[ h,p ] = vartest2 (datal, data2) 

Two-sample F-test for equal variances 

Details and More: Help>Statistics and Machine Learning Toolbox>Hypothesis Tests 
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13.12 Comparison of Means by F-Test 


Example 13_12.m: Injection Molded Plastic 

[2] This script calculates the significance level using an F-distribution. 
1 clear 


2 

datal = [75, 

00 

65, 

65, 

79, 

77, 

75, 

69 , ... 

20 4.5329 

3 

74, 

79, 

66, 

67, 

64, 

68, 

76, 

76]; 

21 p = 

4 

data2 = [79, 

77, 

75, 

70, 

78, 

68, 

71, 

77 , ... 

22 0.0416 

5 

79, 

74, 

73, 

78, 

82, 

74, 

83, 

74]; 



6 m = 16; 

7 xbarl = mean(datal); 

8 xbar2 = mean(data2); 

9 varl = var(datal); 

10 var2 = var(data2); 

11 varx = (varl*(m-1)+var2*(m-1))/((m-1)+(m-1)) 

12 vary = m*var([xbarl, xbar2]) 

13 F = vary/varx 

14 p = fcdf(F, 1, (m-1)+(m-l), 'upper') 


15 

16 

17 

18 
19 


varx = 

23.9979 
vary = 
108.7812 
F = 




Probability Density 
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F-Distribution with Degrees of Freedom 1/30 
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Index 


2-D contour plot, 245 
2-D streamline, 250, 258 

2- D vector plot, 248 
21-bar truss, 165, 326 

3- bar truss, 325, 396 
3-D array expression, 114 
3-D array, 114 

3-D bar plot, 254 
3-D contour plot, 245 
3-D curve, 253 
3-D grid coordinates, 114 
3-D line plot, 21, 237 
3-D streamline, 251, 259 
3-D vector plot, 249 
AAC, 269 
abs, 107 

absolute error tolerance, 430 
abstraction, 136 
Accelerator, 308 
acos, 107 

acosd, 106, 107, 392 
addition of matrices, 94 
algebraic equation, 376 
all, 126 

animatedline, 257 
animation of engine, 260 
anonymous function, 144 
ans, 77 
any, 126 

App Designer, 55, 63, 339 
appdesigner, 63 
apple, 253 
arbitrary load, 150 
area, 431 

arithmetic operators, 92 
array expression, 17 
array operation, 18 
array, 84 

array2table, 187, 190 
arrow, 11 
ASCII code, 78 
ASCII-delimited file, 290 
asin, 107 

asind, 105, 107, 392 
assignment statement, 14 
assume, 365, 366 


assumptions, 365, 366 

asymmetrical two-spring system, 455, 468, 469 

atan, 107 

atan2, 107 

atan2d, 107 

atand, 107 
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audiorecorder, 268, 269, 298 

audios, 267 

audiowrite, 267, 268, 269, 298 
AVI, 260 

axes objects, 57, 218 
axes scaling, 220 
Axes, 223 
axes, 55, 211, 314 
Axes, 59 
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cell2table, 174,187, 190, 191, 193 

celldisp, 173, 174 

CellEditCallback, 319 

cellplot, 173, 174 

central difference, 422 

Central Limit Theory, 494, 496 

centroid, 431 

char, 78, 104 

character, 78 

checkbox, 303 

chi-square distribution, 500 
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convergence study, 428 
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cumulative distribution function, 491 
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curve-fitting tool, 410 
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delete, 211, 216 

Delete, 28, 41 

demo files, 46 

descriptive statistics, 484, 485 
Design View, 63, 339 
desktop size, 12 
det, 394, 397 
diag, 88, 402 
diagonal matrix, 399 
dialog box, 296 
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error, 23, 409 
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figure object, 216 
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file identifier, 39 
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f plot, 226, 369 
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indefinite integral, 387 

indexed image, 262 

indexing to matrix, 37, 85 

inequality constraint, 458 

initial boundary value problem, 438 

initial value problem, 438 

injection molded plastic, 511, 515, 517 
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MATLAB desktop, 11 
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MPEG-4,260, 269 
MRI, 255 
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pizza menu, 127 , 128, 129 
play, 268 , 269 
plot, 19 , 205, 226 
plot3, 21, 237 , 238 
plus, 92 
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seed, 485 

semicolon, 17, 19, 20 

semilogx, 226 

semilogy, 226 

sensitivity, 412 

separator, 12 

Separator, 308 

series solution, 113 

set property, 222 

set, 211 , 212 

shading, 244 

sharp-cornered textbox, 11 

short-circuit logical operator, 101 

Show outputs inline, 359 

ShowText, 247 

sign, 107, 143 


signed integer, 72 

significance level, 503 

simple calculator, 103 

simplification of expression, 364 

simplify, 28, 30, 364, 366 

simplifyFraction, 366 

simply supported beam, 115 

sin, 13, 107 

sind, 105, 107 

single-precision number, 77 

single-variable optimization, 465 

single, 74, 75 

sinking sort, 153 

size and length of array, 86 

size, 85, 86 

slash /, 397 

slash operator, 394 

slider, 303 

slider, 315 

SliderStep, 303 
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streamparticles, 258, 259, 276 
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String, 230, 232, 303 
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symmetrical two-spring system, 145, 466, 467 
syms, 28, 29, 360, 362, 363, 364, 392 
symvar, 361, 363 
syntax, 23 
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text, 227, 230, 303 

textbox, 11 

TextList, 247 

thermal stresses in a Pipe, 122 

thickness of glass sheets, 484, 498 

tic, 133 

TIFF, 266 

tinv, 507 
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vartest, 504 

vartest2, 515, 516 

vector expression, 109 

vector plot, 248 

vector, 18, 84 

vertcat, 87, 88 

VerticalAlignment, 230 

vibrating circular membrane, 275 

vibrating string, 275 
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